Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-16 17:24:23 +00:00
Code Issues Projects Releases Packages Wiki Activity

(speedbar-directory-buttons): Recognize

Browse source 
device names when checking for file names.
This commit is contained in:
Richard M. Stallman 1999-08-29 19:37:29 +00:00
parent 599c6c1763
commit cc5034d2b5
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/speedbar.el
View file

@ -5,7 +5,7 @@
;; Author: Eric M. Ludlam <zappo@gnu.org>
;; Version: 0.8.1
;; Keywords: file, tags, tools
;; X-RCS: $Id: speedbar.el,v 1.22 1999/03/13 04:52:25 kwzh Exp kwzh $
;; X-RCS: $Id: speedbar.el,v 1.23 1999/06/04 18:22:55 kwzh Exp rms $
;; This file is part of GNU Emacs.
@ -2165,7 +2165,8 @@ INDEX is not used, but is required by the caller."
'speedbar-directory-face
'speedbar-highlight-face
'speedbar-directory-buttons-follow
(if (= (match-beginning 1) p)
(if (and (= (match-beginning 1) p)
(not (char-equal (char-after (+ p 1)) ?:)))
(expand-file-name "~/") ;the tilde
(buffer-substring-no-properties
p (match-end 0)))))