aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuanma Barranquero2005-07-04 02:15:34 +0000
committerJuanma Barranquero2005-07-04 02:15:34 +0000
commitf93e905fd56344eff2e1bf30a71c89cd549dfade (patch)
tree1d9597c0113f5a28ee121ea59ec14b59a90b4d5c
parent7ae4587b12f3a9f66d939717b29fae3b0c7a21e2 (diff)
downloademacs-f93e905fd56344eff2e1bf30a71c89cd549dfade.tar.gz
emacs-f93e905fd56344eff2e1bf30a71c89cd549dfade.zip
(lpr): Finish `defgroup' description with period.
(printify-region): "?\ " -> "?\s".
-rw-r--r--lisp/lpr.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/lpr.el b/lisp/lpr.el
index 0eac7b7ba31..445c793fcdd 100644
--- a/lisp/lpr.el
+++ b/lisp/lpr.el
@@ -41,7 +41,7 @@
41 41
42 42
43(defgroup lpr nil 43(defgroup lpr nil
44 "Print Emacs buffer on line printer" 44 "Print Emacs buffer on line printer."
45 :group 'wp) 45 :group 'wp)
46 46
47 47
@@ -291,7 +291,7 @@ The characters tab, linefeed, space, return and formfeed are not affected."
291 (while (re-search-forward "[\^@-\^h\^k\^n-\^_\177-\377]" nil t) 291 (while (re-search-forward "[\^@-\^h\^k\^n-\^_\177-\377]" nil t)
292 (setq c (preceding-char)) 292 (setq c (preceding-char))
293 (delete-backward-char 1) 293 (delete-backward-char 1)
294 (insert (if (< c ?\ ) 294 (insert (if (< c ?\s)
295 (format "\\^%c" (+ c ?@)) 295 (format "\\^%c" (+ c ?@))
296 (format "\\%02x" c)))))))) 296 (format "\\%02x" c))))))))
297 297