changeset 14712:974766c7bddc

(ps-generate): Bind inhibit-read-only.
author Richard M. Stallman <rms@gnu.org>
date Wed, 28 Feb 1996 18:51:36 +0000
parents 65d08233b9f7
children 21afbe61f153
files lisp/ps-print.el
diffstat 1 files changed, 4 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ps-print.el	Wed Feb 28 18:07:46 1996 +0000
+++ b/lisp/ps-print.el	Wed Feb 28 18:51:36 1996 +0000
@@ -1805,7 +1805,10 @@
 
 (defun ps-generate (buffer from to genfunc)
   (let ((from (min to from))
-	(to (max to from)))
+	(to (max to from))
+	;; This avoids trouble if chars with read-only properties
+	;; are copied into ps-spool-buffer.
+	(inhibit-read-only t))
     (save-restriction
       (narrow-to-region from to)
       (if ps-razzle-dazzle