diff options
| author | Jim Blandy | 1991-04-22 23:55:24 +0000 |
|---|---|---|
| committer | Jim Blandy | 1991-04-22 23:55:24 +0000 |
| commit | 0101ec2ad0d1746857bb5aa13a9a8e2afe964aef (patch) | |
| tree | 410cc19a39e801321ce3688fcffacbbea2638a67 | |
| parent | 14c5b7212d09ee8c53670d9a8145ac71824ef50b (diff) | |
| download | emacs-0101ec2ad0d1746857bb5aa13a9a8e2afe964aef.tar.gz emacs-0101ec2ad0d1746857bb5aa13a9a8e2afe964aef.zip | |
*** empty log message ***
| -rw-r--r-- | lisp/resume.el | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/lisp/resume.el b/lisp/resume.el index 86866c12763..5f745caeac3 100644 --- a/lisp/resume.el +++ b/lisp/resume.el | |||
| @@ -89,10 +89,9 @@ | |||
| 89 | "Buffer that is used by resume-process-args.") | 89 | "Buffer that is used by resume-process-args.") |
| 90 | 90 | ||
| 91 | (defun resume-process-args () | 91 | (defun resume-process-args () |
| 92 | "This should be called from inside of suspend-resume-hook. This | 92 | "This should be called from inside of `suspend-resume-hook'. |
| 93 | grabs the contents of the file whose name is stored in | 93 | This grabs the contents of the file whose name is stored in `emacs-args-file', |
| 94 | emacs-args-file, and processes these arguments like command line | 94 | and processes these arguments like command line options." |
| 95 | options." | ||
| 96 | (let ((start-buffer (current-buffer)) | 95 | (let ((start-buffer (current-buffer)) |
| 97 | (args-buffer (get-buffer-create emacs-args-buffer)) | 96 | (args-buffer (get-buffer-create emacs-args-buffer)) |
| 98 | length args) | 97 | length args) |
| @@ -141,7 +140,7 @@ options." | |||
| 141 | 140 | ||
| 142 | (defun empty-args-file () | 141 | (defun empty-args-file () |
| 143 | "This empties the contents of the file whose name is specified by | 142 | "This empties the contents of the file whose name is specified by |
| 144 | emacs-args-file." | 143 | `emacs-args-file'." |
| 145 | (save-excursion | 144 | (save-excursion |
| 146 | (set-buffer (get-buffer-create emacs-args-buffer)) | 145 | (set-buffer (get-buffer-create emacs-args-buffer)) |
| 147 | (erase-buffer) | 146 | (erase-buffer) |