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