/[emacs]/emacs/lisp/term/x-win.el
ViewVC logotype

Diff of /emacs/lisp/term/x-win.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.151 by jhd, Sun Mar 10 16:27:26 2002 UTC revision 1.152 by jhd, Tue Mar 12 19:14:24 2002 UTC
# Line 290  that it should abort the window system s Line 290  that it should abort the window system s
290          (kill-buffer buf)          (kill-buffer buf)
291          cancel-shutdown))))          cancel-shutdown))))
292    
293  (defun emacs-session-restore ()  (defun emacs-session-restore (previous-session-id)
294    "Restore the Emacs session if started by a session manager.    "Restore the Emacs session if started by a session manager.
295  The file saved by `emacs-session-save' is evaluated and deleted if it  The file saved by `emacs-session-save' is evaluated and deleted if it
296  exists."  exists."
297    (let ((filename (emacs-session-filename x-session-previous-id)))    (let ((filename (emacs-session-filename previous-session-id)))
298      (when (file-exists-p filename)      (when (file-exists-p filename)
299        (load-file filename)        (load-file filename)
300        (delete-file filename)        (delete-file filename)

Legend:
Removed from v.1.151  
changed lines
  Added in v.1.152

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26