mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-20 13:00:51 -07:00
Code Issues Projects Releases Wiki Activity

(ldap-search-internal): Handle <file://...> in results.

Browse source
This commit is contained in:
Richard M. Stallman 2001-12-28 06:29:37 +00:00
parent 4e02881b80
commit cf3b69c44c
2 changed files with 4 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/ChangeLog
View file

@ -1,5 +1,7 @@
2001-12-28 Richard M. Stallman <rms@gnu.org>
* net/ldap.el (ldap-search-internal): Handle <file://...> in results.
* simple.el (line-move-invisible): New subroutine.
(line-move-to-column): New subroutine--smarter about advancing over
invisible parts of a line, or lines, but only as long as hpos grows.

4
lisp/net/ldap.el
View file

@ -584,9 +584,9 @@ an alist of attribute/value pairs."
(end-of-line)
(point))))
(forward-line 1)
(while (looking-at "^\\(\\w*\\)[=:\t ]+\\(.*\\)$")
(while (looking-at "^\\(\\w*\\)[=:\t ]+\\(<[\t ]*file://\\)?\\(.*\\)$")
(setq name (match-string 1)
value (match-string 2))
value (match-string 3))
(save-excursion
(set-buffer bufval)
(erase-buffer)