Index: emacs/lisp/url/url-ns.el
diff -c emacs/lisp/url/url-ns.el:1.4 emacs/lisp/url/url-ns.el:1.5
*** emacs/lisp/url/url-ns.el:1.4        Tue Oct 19 21:36:33 2004
--- emacs/lisp/url/url-ns.el    Mon May 16 10:07:31 2005
***************
*** 51,59 ****
      (if (or (/= (length netc) (length ipc))
            (/= (length ipc) (length maskc)))
        nil
!       (setq netc (mapcar 'string-to-int netc)
!           ipc (mapcar 'string-to-int ipc)
!           maskc (mapcar 'string-to-int maskc))
        (and
         (= (logand (nth 0 netc) (nth 0 maskc))
          (logand (nth 0 ipc)  (nth 0 maskc)))
--- 51,59 ----
      (if (or (/= (length netc) (length ipc))
            (/= (length ipc) (length maskc)))
        nil
!       (setq netc (mapcar 'string-to-number netc)
!           ipc (mapcar 'string-to-number ipc)
!           maskc (mapcar 'string-to-number maskc))
        (and
         (= (logand (nth 0 netc) (nth 0 maskc))
          (logand (nth 0 ipc)  (nth 0 maskc)))


_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs

Reply via email to