[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs/lisp/gnus nntp.el ChangeLog
From: |
Katsumi Yamaoka |
Subject: |
[Emacs-diffs] emacs/lisp/gnus nntp.el ChangeLog |
Date: |
Fri, 18 Dec 2009 00:47:22 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Changes by: Katsumi Yamaoka <yamaoka> 09/12/18 00:47:22
Modified files:
lisp/gnus : nntp.el ChangeLog
Log message:
(nntp-service-to-port): Work for port expressed with numeric string;
replace [:digit:] with [0-9] for XEmacs.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/gnus/nntp.el?cvsroot=emacs&r1=1.47&r2=1.48
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/gnus/ChangeLog?cvsroot=emacs&r1=1.850&r2=1.851
Patches:
Index: nntp.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/gnus/nntp.el,v
retrieving revision 1.47
retrieving revision 1.48
diff -u -b -r1.47 -r1.48
--- nntp.el 5 Feb 2009 02:34:34 -0000 1.47
+++ nntp.el 18 Dec 2009 00:47:21 -0000 1.48
@@ -1816,13 +1816,13 @@
(defun nntp-service-to-port (svc)
(cond
((integerp svc) (number-to-string svc))
- ((string-match "\\`[[:digit:]]\\'" svc) svc)
+ ((string-match "\\`[0-9]+\\'" svc) svc)
(t
(with-temp-buffer
(ignore-errors (insert-file-contents "/etc/services"))
(goto-char (point-min))
(if (re-search-forward (concat "^" (regexp-quote svc)
- "[ \t]+\\([[:digit:]]+\\)/tcp"))
+ "[ \t]+\\([0-9]+\\)/tcp"))
(match-string 1)
svc)))))
Index: ChangeLog
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/gnus/ChangeLog,v
retrieving revision 1.850
retrieving revision 1.851
diff -u -b -r1.850 -r1.851
--- ChangeLog 17 Dec 2009 04:15:25 -0000 1.850
+++ ChangeLog 18 Dec 2009 00:47:21 -0000 1.851
@@ -1,3 +1,8 @@
+2009-12-18 Katsumi Yamaoka <address@hidden>
+
+ * nntp.el (nntp-service-to-port): Work for port expressed with numeric
+ string; replace [:digit:] with [0-9] for XEmacs.
+
2009-12-17 Glenn Morris <address@hidden>
* gnus-group.el (gnus-bug-group-download-format-alist):
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs/lisp/gnus nntp.el ChangeLog,
Katsumi Yamaoka <=