diff options
| author | Karl Heuer | 1996-07-07 17:30:04 +0000 |
|---|---|---|
| committer | Karl Heuer | 1996-07-07 17:30:04 +0000 |
| commit | 45a870d9f056b36f4e3492864a660ba889170c29 (patch) | |
| tree | 725122aff20cd1defc2671fc183bb130c57b8ce0 | |
| parent | 906628ef8f25604d27e8818f93f83c394c95dc81 (diff) | |
| download | emacs-45a870d9f056b36f4e3492864a660ba889170c29.tar.gz emacs-45a870d9f056b36f4e3492864a660ba889170c29.zip | |
(ps-article-subject): Don't die if no subject header.
| -rw-r--r-- | lisp/ps-print.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/ps-print.el b/lisp/ps-print.el index cc5066bcf6f..60bc9aca6b1 100644 --- a/lisp/ps-print.el +++ b/lisp/ps-print.el | |||
| @@ -1944,7 +1944,7 @@ EndDSCPage\n")) | |||
| 1944 | (defun ps-article-subject () | 1944 | (defun ps-article-subject () |
| 1945 | (save-excursion | 1945 | (save-excursion |
| 1946 | (goto-char (point-min)) | 1946 | (goto-char (point-min)) |
| 1947 | (if (re-search-forward "^Subject:[ \t]+\\(.*\\)$") | 1947 | (if (re-search-forward "^Subject:[ \t]+\\(.*\\)$" nil t) |
| 1948 | (buffer-substring (match-beginning 1) (match-end 1)) | 1948 | (buffer-substring (match-beginning 1) (match-end 1)) |
| 1949 | "Subject ???"))) | 1949 | "Subject ???"))) |
| 1950 | 1950 | ||