view etc/toolbar/mail-up.xpm @ 4648:907697569a49

Mark buffers modified in #'find-file if nonexistent file; fix other bugs. lisp/ChangeLog addition: 2009-07-12 Aidan Kehoe <kehoea@parhasard.net> * files.el (find-file-create-switch-thunk): New macro, used to mark buffers created within #'find-file (and related) modified if the associated file doesn't exist. (find-alternate-file-other-window): Correct this, pass CODESYS to find-file-other-window. (find-file-read-only): Correct behaviour of this function in the presence of wildcards. (find-file): (find-file-other-window): (find-file-other-frame): (find-file-read-only-other-window): (find-file-read-only-other-frame): (find-alternate-file): Simplify these functions, use #'find-file-create-switch-thunk' instead of explicit #'switch-to-buffer calls.
author Aidan Kehoe <kehoea@parhasard.net>
date Sun, 12 Jul 2009 14:01:09 +0100
parents 376386a54a3c
children 7910031dd78a
line wrap: on
line source

/* XPM */
static char * mail[] = {
"28 28 5 1",
"X	c Gray75 s backgroundToolBarColor",
"o	c black",
"O	c Gray90",
"+	c Gray60",
"@	c white",
"XXXXXXXXXXXXXXXXXXXXXXXXXXXX",
"XXXXXXXXXXXXXXXXXXXXXXXXXXXX",
"XXXXXXXoooooooooooXXXXXXXXXX",
"XXXXXXXoOOOOOOOOOooXXXXXXXXX",
"XXXXXXXoOOOOOOOOOo+oXXXXXXXX",
"XXXXXXXoOOOOOOOOOooooXXXXXXX",
"XXXXXXXoOOOOOOOOOOOOoXXXXXXX",
"XXooooooooooooooooooooooooXX",
"XXo@@@@@@@@@@@@@@@@@@@@@@oXX",
"XXo@oo@@@@@@@@@@@@@@@ooo@oXX",
"XXo@@@@@@@@@@@@@@@@@@o+o@oXX",
"XXo@@@@@@@@@@@@@@@@@@o+o@oXX",
"XXo@@@@@ooooooooo@@@@ooo@oXX",
"XXo@@@@@@@@@@@@@@@@@@@@@@oXX",
"XXo@@@@@ooooooo@@@@@@@@@@oXX",
"XXo@@@@@@@@@@@@@@@@@@@@@@oXX",
"XXo@@@@@ooooo@@@@@@@@@@@@oXX",
"XXo@@@@@@@@@@@@@@@@@@@@@@oXX",
"XXo@@@@@@@@@@@@@@@@@@@@@@oXX",
"XXo@@@@@@@@@@@@@@@@@@@@@@oXX",
"XXooooooooooooooooooooooooXX",
"XXXXXXXoOOOOOOOOOOOOoXXXXXXX",
"XXXXXXXooooooooooooooXXXXXXX",
"XXXXXXXXXXXXXXXXXXXXXXXXXXXX",
"XXXXXXXXXXXXXXXXXXXXXXXXXXXX",
"XXXXXXXXXXXXXXXXXXXXXXXXXXXX",
"XXXXXXXXXXXXXXXXXXXXXXXXXXXX",
"XXXXXXXXXXXXXXXXXXXXXXXXXXXX"};