view lisp/mail/reply2.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.

/* XPM */
static char * mail_reply_xpm[] = {
/* columns rows colors chars-per-pixel */
"24 24 9 1",
" 	c None",
".	c black",
"X	c #673e666663d4",
"o	c #eb46ea1de471",
"O	c #a852a7bea3d2",
"+	c #ae51c17b9b26",
"@	c #8d4d97577838",
"#	c #7c7c8b8b6e6e",
"$	c #5e0868be52d3",
/* pixels */
"                        ",
"                        ",
"                        ",
"                        ",
"                        ",
"              ....      ",
"         .....XooO.     ",
"    .....XOooooooO.     ",
"   .XOooooooooooXOO.    ",
"   .oXXooooooooOXOo.    ",
"   .OoOXXooooooXOoo.    ",
"    .oooOOXOooXXXooO.   ",
"    ........XXOoOXOo.   ",
"    ..++++@.ooooooXO.   ",
"     ..+@@@.oooooooXO.  ",
"    ..+@@@#.oooooooO..  ",
"  ..++@@@#$.ooooO...    ",
" .++++@@#.$.oO...       ",
"  .+@@@#.o....          ",
"   .+@#$...             ",
"    .#$.                ",
"     .$.                ",
"      .                 ",
"                        "};