Parent Directory | Revision Log | Patch
revision 1.177 by lektu, Fri Jan 31 15:20:13 2003 UTC | revision 1.178 by monnier, Mon Feb 10 22:20:47 2003 UTC | |
---|---|---|
# | Line 64 Return t if file exists." | Line 64 Return t if file exists." |
64 | (message "Loading %s (source)..." file) | (message "Loading %s (source)..." file) |
65 | (message "Loading %s..." file))) | (message "Loading %s..." file))) |
66 | (when purify-flag | (when purify-flag |
67 | (setq preloaded-file-list (cons file preloaded-file-list))) | (push file preloaded-file-list)) |
68 | (unwind-protect | (unwind-protect |
69 | (let ((load-file-name fullname) | (let ((load-file-name fullname) |
70 | (set-auto-coding-for-load t) | (set-auto-coding-for-load t) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |