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.

/* XPM */
static char * right_xpm[] = {
"10 10 5 1",
" 	c Gray40",
".	c Gray40",
"X	c none",
"o	c Gray75",
"O	c Gray90",
" .XXXXXXXX",
" ...XXXXXX",
"  ....XXXX",
"  oo....XX",
"  oooo....",
"  ooooOOOO",
"  ooOOOOXX",
"  OOOOXXXX",
" OOOXXXXXX",
" OXXXXXXXX"};