diff options
| author | Tassilo Horn | 2009-01-27 18:34:02 +0000 |
|---|---|---|
| committer | Tassilo Horn | 2009-01-27 18:34:02 +0000 |
| commit | ff0def0e8f1a233c48d05399e1ef632426b10d23 (patch) | |
| tree | dbc95d9df44e622ab2276ee430d0c6538a2cc0c6 | |
| parent | b4ba5e86135de90e99869f15d5f842121ed7f047 (diff) | |
| download | emacs-ff0def0e8f1a233c48d05399e1ef632426b10d23.tar.gz emacs-ff0def0e8f1a233c48d05399e1ef632426b10d23.zip | |
Fix broken call to string-match.
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/doc-view.el | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 33076abb2f4..a8a7ac85a8d 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,5 +1,9 @@ | |||
| 1 | 2009-01-27 Tassilo Horn <tassilo@member.fsf.org> | 1 | 2009-01-27 Tassilo Horn <tassilo@member.fsf.org> |
| 2 | 2 | ||
| 3 | (doc-view-mode): Fix broken call to string-match. | ||
| 4 | |||
| 5 | 2009-01-27 Tassilo Horn <tassilo@member.fsf.org> | ||
| 6 | |||
| 3 | * doc-view.el (doc-view-mode): Enhance docstring and fallback to | 7 | * doc-view.el (doc-view-mode): Enhance docstring and fallback to |
| 4 | fundamental-mode or ps-mode if the file is empty or doesn't exist | 8 | fundamental-mode or ps-mode if the file is empty or doesn't exist |
| 5 | at all. | 9 | at all. |
diff --git a/lisp/doc-view.el b/lisp/doc-view.el index 2507b864470..8817db739e1 100644 --- a/lisp/doc-view.el +++ b/lisp/doc-view.el | |||
| @@ -1095,7 +1095,7 @@ toggle between displaying the document or editing it as text. | |||
| 1095 | (= (point-min) (point-max))) | 1095 | (= (point-min) (point-max))) |
| 1096 | ;; The doc is empty or doesn't exist at all, so fallback to an | 1096 | ;; The doc is empty or doesn't exist at all, so fallback to an |
| 1097 | ;; editing mode. | 1097 | ;; editing mode. |
| 1098 | (if (string-match "[eE]?[pP][sS]" (file-name-extension buffer-file-name) "") | 1098 | (if (string-match "[eE]?[pP][sS]" (file-name-extension buffer-file-name)) |
| 1099 | (ps-mode) | 1099 | (ps-mode) |
| 1100 | (fundamental-mode)) ;;Should we activate d-v-minor-mode here? | 1100 | (fundamental-mode)) ;;Should we activate d-v-minor-mode here? |
| 1101 | 1101 | ||