227 |
fill-column |
fill-column |
228 |
overwrite-mode |
overwrite-mode |
229 |
change-log-default-name |
change-log-default-name |
230 |
line-number-mode) |
line-number-mode |
231 |
|
buffer-file-coding-system) |
232 |
"List of local variables to save for each buffer. |
"List of local variables to save for each buffer. |
233 |
The variables are saved only when they really are local." |
The variables are saved only when they really are local." |
234 |
:type '(repeat symbol) |
:type '(repeat symbol) |
873 |
(y-or-n-p (format |
(y-or-n-p (format |
874 |
"File \"%s\" no longer exists. Re-create? " |
"File \"%s\" no longer exists. Re-create? " |
875 |
desktop-buffer-file-name)))) |
desktop-buffer-file-name)))) |
876 |
(let ((buf (find-file-noselect desktop-buffer-file-name))) |
(let* ((auto-insert nil) ; Disable auto insertion |
877 |
|
(coding-system-for-read |
878 |
|
(or coding-system-for-read |
879 |
|
(cdr (assq 'buffer-file-coding-system |
880 |
|
desktop-buffer-locals)))) |
881 |
|
(buf (find-file-noselect desktop-buffer-file-name))) |
882 |
(condition-case nil |
(condition-case nil |
883 |
(switch-to-buffer buf) |
(switch-to-buffer buf) |
884 |
(error (pop-to-buffer buf))) |
(error (pop-to-buffer buf))) |