diff options
Diffstat (limited to 'lisp/lpr.el')
| -rw-r--r-- | lisp/lpr.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/lpr.el b/lisp/lpr.el index 51b68c1ab48..559dc5513ae 100644 --- a/lisp/lpr.el +++ b/lisp/lpr.el @@ -291,7 +291,7 @@ The characters tab, linefeed, space, return and formfeed are not affected." (let (c) (while (re-search-forward "[\^@-\^h\^k\^n-\^_\177-\377]" nil t) (setq c (preceding-char)) - (delete-backward-char 1) + (delete-char -1) (insert (if (< c ?\s) (format "\\^%c" (+ c ?@)) (format "\\%02x" c)))))))) |