# HG changeset patch # User Chong Yidong # Date 1218566118 0 # Node ID 92660418caaed347d9a5ae0502da5303db198943 # Parent ee8eefbfeab3c24fb74cd17b40e52b0fcf7de59f (ldap-search-internal): Tweak URL regexp. diff -r ee8eefbfeab3 -r 92660418caae lisp/net/ldap.el --- a/lisp/net/ldap.el Tue Aug 12 18:35:06 2008 +0000 +++ b/lisp/net/ldap.el Tue Aug 12 18:35:18 2008 +0000 @@ -584,7 +584,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