Gnus development mailing list
 help / color / mirror / Atom feed
* Posting illegible text
@ 2002-03-20 10:49 Mark Milhollan
  2002-03-21 19:43 ` ShengHuo ZHU
  0 siblings, 1 reply; 2+ messages in thread
From: Mark Milhollan @ 2002-03-20 10:49 UTC (permalink / raw)


Sometimes posting `illegible' text is just what you want to do.  So,
another option for message-fix-before-sending would be helpful.

Index: message.el
===================================================================
RCS file: /usr/local/cvsroot/gnus/lisp/message.el,v
retrieving revision 6.220
diff -u -r6.220 message.el
--- message.el	2002/03/13 19:51:34	6.220
+++ message.el	2002/03/20 10:48:36
@@ -2746,6 +2746,7 @@
 	       "Illegible text found. Continue posting? "
 	       '((?d "Remove and continue posting")
 		 (?r "Replace with dots and continue posting")
+		 (?i "Ignore and continue posting")
 		 (?e "Continue editing"))))
 	(if (eq choice ?e)
 	  (error "Illegible text found"))
@@ -2758,9 +2759,11 @@
 			   (memq (char-charset char)
 				 '(eight-bit-control eight-bit-graphic
 						     control-1)))))
-	    (delete-char 1)
-	    (if (eq choice ?r)
-		(insert ".")))
+	    (if (eq choice ?i)
+		(remove-text-properties (point) (1+ (point)) '(highlight t))
+	      (delete-char 1)
+	      (if (eq choice ?r)
+		  (insert "."))))
 	  (forward-char)
 	  (skip-chars-forward mm-7bit-chars))))))
 

/mark



^ permalink raw reply	[flat|nested] 2+ messages in thread

* Re: Posting illegible text
  2002-03-20 10:49 Posting illegible text Mark Milhollan
@ 2002-03-21 19:43 ` ShengHuo ZHU
  0 siblings, 0 replies; 2+ messages in thread
From: ShengHuo ZHU @ 2002-03-21 19:43 UTC (permalink / raw)


Mark Milhollan <mlm@attglobal.net> writes:

> Sometimes posting `illegible' text is just what you want to do.  So,
> another option for message-fix-before-sending would be helpful.

Installed. Thanks.

ShengHuo



^ permalink raw reply	[flat|nested] 2+ messages in thread

end of thread, other threads:[~2002-03-21 19:43 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2002-03-20 10:49 Posting illegible text Mark Milhollan
2002-03-21 19:43 ` ShengHuo ZHU

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).