Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
7
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
6430562b
Commit
6430562b
authored
Aug 12, 2008
by
Chong Yidong
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
(ldap-search-internal): Tweak URL regexp.
parent
9b550c32
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
3 additions
and
1 deletion
+3
-1
lisp/net/ldap.el
lisp/net/ldap.el
+3
-1
No files found.
lisp/net/ldap.el
View file @
6430562b
...
...
@@ -584,7 +584,9 @@ an alist of attribute/value pairs."
(
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
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment