view lisp/toolbar/page-down.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 2568d5a27317
children
line wrap: on
line source

/* XPM */
static char * mail_page_xpm[] = {
/* columns rows colors chars-per-pixel */
"24 24 5 1",
" 	c None",
".	c black",
"X	c #ea03ea03d271",
"o	c #a5d8a5d89550",
"O	c #d305d305bc3c",
/* pixels */
"                        ",
"                        ",
"   ..................   ",
"   .XXXXXXXXXXXXXXXX.   ",
"   .XXXXXXXXXXXXXXXX.   ",
"   .XoooooooooooooXX.   ",
"   .XXXXXXXXXXXXXXXX.   ",
"   .XXXXXXXXXXXXXXXX.   ",
"   .Xoooooooooo..oXX.   ",
"   .XXXXXXXXXXX..XXX.   ",
"   .XXXXXXXXXXX..XXX.   ",
"   .XooooooXXXX..XXX.   ",
"   .XXXXXXXXXXX..XXX.   ",
"   .XXXXXXXXX.O..O.X.   ",
"   .Xoooooooo.....XX.   ",
"   .XXXXXXXXXX....XX.   ",
"   .XXXXXXXXXXX..XXX.   ",
"   .XXXXXXXXXXXooXXX.   ",
"   .XXXXXXXXXXXXXXXX.   ",
"   .XXXXXXXXXXXXXXXX.   ",
"   ..................   ",
"                        ",
"                        ",
"                        "};