diff options
| -rw-r--r-- | lisp/progmodes/ps-mode.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/progmodes/ps-mode.el b/lisp/progmodes/ps-mode.el index cf09b98b491..0ea2bee0aa2 100644 --- a/lisp/progmodes/ps-mode.el +++ b/lisp/progmodes/ps-mode.el | |||
| @@ -739,7 +739,8 @@ Only one `%' is removed, and it has to be in the first column." | |||
| 739 | (setq i (1+ i)) | 739 | (setq i (1+ i)) |
| 740 | (backward-char) | 740 | (backward-char) |
| 741 | (insert (format "\\%03o" (string-to-char | 741 | (insert (format "\\%03o" (string-to-char |
| 742 | (buffer-substring (point) (1+ (point)))))) | 742 | (string-make-unibyte |
| 743 | (buffer-substring (point) (1+ (point))))))) | ||
| 743 | (delete-char 1)) | 744 | (delete-char 1)) |
| 744 | (message "%d change%s made" i (if (= i 1) "" "s")) | 745 | (message "%d change%s made" i (if (= i 1) "" "s")) |
| 745 | (set-marker endm nil))))) | 746 | (set-marker endm nil))))) |