Mercurial > emacs

changeset 80719:0bd3bab4b7be

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(ldap-search-internal): Tweak URL regexp.
author Chong Yidong <cyd@stupidchicken.com>
date Tue, 12 Aug 2008 18:36:15 +0000
parents 37af827f3a71
children 9cdccb5e49a8
files lisp/net/ldap.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/net/ldap.el	Tue Aug 12 18:36:03 2008 +0000
+++ b/lisp/net/ldap.el	Tue Aug 12 18:36:15 2008 +0000
@@ -586,7 +586,9 @@
 					       (end-of-line)
 					       (point))))
 	  (forward-line 1)
-	  (while (looking-at "^\\(\\w*\\)\\(;\\w*\\)?[=:\t ]+\\(<[\t ]*file://\\)\\(.*\\)$")
+          (while (looking-at "^\\([A-Za-z][-A-Za-z0-9]*\
+\\|[0-9]+\\(?:\\.[0-9]+\\)*\\)\\(;[-A-Za-z0-9]+\\)*[=:\t ]+\
+\\(<[\t ]*file://\\)\\(.*\\)$")
 	    (setq name (match-string 1)
 		  value (match-string 4))
             ;; Need to handle file:///D:/... as generated by OpenLDAP