mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

Add ps-mode-tests.el and remove a compilation warning

Browse source 
* lisp/progmodes/ps-mode.el (ps-mode-octal-region): Remove a
string-make-unibyte that apparently had no effect here.
* test/lisp/progmodes/ps-mode-tests.el: New file.
This commit is contained in:
Lars Ingebrigtsen 2019-06-13 02:48:41 +02:00
parent b334124a23
commit 5b7ec43c61
2 changed files with 39 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/progmodes/ps-mode.el
View file

@ -738,7 +738,8 @@ Only one `%' is removed, and it has to be in the first column."
(while (re-search-forward "[\200-\377]" (marker-position endm) t)
(setq i (1+ i))
(backward-char)
(insert (format "\\%03o" (string-to-char (string-make-unibyte (buffer-substring (point) (1+ (point)))))))
(insert (format "\\%03o" (string-to-char
(buffer-substring (point) (1+ (point))))))
(delete-char 1))
(message "%d change%s made" i (if (= i 1) "" "s"))
(set-marker endm nil)))))