# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 935955449 0
# Node ID 07df7c76466971f086be7e26cbbfd65e1a672a31
# Parent  2e359ef9797ed1d494132b27857f9d4669b0d982
(speedbar-directory-buttons): Recognize
device names when checking for file names.

diff -r 2e359ef9797e -r 07df7c764669 lisp/speedbar.el
--- a/lisp/speedbar.el	Sun Aug 29 19:32:33 1999 +0000
+++ b/lisp/speedbar.el	Sun Aug 29 19:37:29 1999 +0000
@@ -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 @@
 			      '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)))))