Mercurial > emacs
view lisp/toolbar/alias.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 | 30c4902b654d |
children |
line wrap: on
line source
/* XPM */ static char * alias_xpm[] = { /* columns rows colors chars-per-pixel */ "24 24 4 1", " c None", ". c #61b761b7600a", "X c #a5d8a5d89550", "o c black", /* pixels */ " ", " ", " ", " ...... ", " ...XXXX..XX ", " o..ooooooo... ", " ooo oooo..X ", " o.X ooo... ", " o.X ooo.XX ", " o.X oo.. ", " o.X oo. ", " o... oo.. ", " o.X o.. ", " o.XX oX. ", " o.... oo. ", " o..XX oooo ", " o...XXX XXoooo ", " ooo........ooooo ", " oooooXXooooo.oo ", " ooo o..oo", " o...", " ooo", " oo", " "};