Mercurial > emacs
view lisp/toolbar/gud-watch.xpm @ 53323:a053c8c470f3
Handle non-readable directories.
(ido-decorations): Add 9th element for non-readable directory.
(ido-directory-nonreadable): New dynamic var.
(ido-set-current-directory): Set it.
(ido-read-buffer, ido-file-internal):
(ido-read-file-name, ido-read-directory-name): Let-bind it.
(ido-file-name-all-completions1): Return empty list for
non-readable directory.
(ido-exhibit): Print [Not readable] if directory is not readable.
(ido-expand-directory): New defun (based on tiny fix from Karl Chen).
(ido-read-file-name, ido-file-internal, ido-read-directory-name):
Use it.
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Sat, 27 Dec 2003 21:56:51 +0000 |
parents | 82060ad7b6a1 |
children | f7114bba1fd4 |
line wrap: on
line source
/* XPM */ static char * watch_xpm[] = { "24 24 11 1", " c #C0C0C0C0C0C0", ". c #808080808080", "X c #000000000000", "o c #A5A59F9FA3A3", "O c #B5B5B9B9B5B5", "+ c #070707070707", "@ c #616161616161", "# c #2D2D30302D2D", "$ c #020202020202", "% c #9A9A99999A9A", "& c #2F2F1A1A0202", " ", " ", " ", " ", " ", " .XX ", " oX. X Xo ", " O+@ X@# ", " # X O$o ", " ## @# ", " @+O O$o ", " %XX&% %&X&## ", " %#O O#%X%#O O#X ", " &O O& &O O& ", " X X X X ", " &O O& &O O& ", " %#O O#% %#O O#% ", " %&X&% %&X&% ", " ", " ", " ", " ", " ", " "};