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 *face[] = {
/* width height num_colors chars_per_pixel */
"    17    17        4            1",
/* colors */
". c #000000",
"a c #a8b038",
"b c #f8f800",
"c s None c None",
/* pixels */
"ccccccccccccccccc",
"ccccccccccccccccc",
"cccccbbbbbbcccccc",
"ccccbbbbbbbbccccc",
"cccbbbbbbbbbbcccc",
"ccbbbbbbbbbbbbccc",
"cbbaaabbbbaaabbcc",
"cbbbbbbbbbbbbbbcc",
"cbbbbbbaabbbbbbcc",
"cbbbbbbaabbbbbbcc",
"cbbbbbbaabbbbbbcc",
"cbbbbbaaaabbbbbcc",
"ccbbabbbbbbabbccc",
"cccbbabbbbabbcccc",
"ccccbbaaaabbccccc",
"cccccbbbbbbcccccc",
"ccccccccccccccccc"
};