* riece-foolproof.el (riece-foolproof-command-send-message-function):
authorTAKAHASHI Kaoru <kaoru@kaisei.org>
Tue, 7 Dec 2004 06:16:49 +0000 (06:16 +0000)
committerTAKAHASHI Kaoru <kaoru@kaisei.org>
Tue, 7 Dec 2004 06:16:49 +0000 (06:16 +0000)
Check invisible text.

lisp/ChangeLog
lisp/riece-foolproof.el

index a1d217d..560978b 100644 (file)
@@ -1,3 +1,8 @@
+2004-12-07  TAKAHASHI Kaoru  <kaoru@kaisei.org>
+
+       * riece-foolproof.el (riece-foolproof-command-send-message-function): 
+       Check invisible text.
+
 2004-12-07  Daiki Ueno  <ueno@unixuser.org>
 
        * test/test-riece-log.el (test-riece-log-encode-file-name): New
 2004-12-07  Daiki Ueno  <ueno@unixuser.org>
 
        * test/test-riece-log.el (test-riece-log-encode-file-name): New
index f691a0a..75e2e97 100644 (file)
                 riece-current-channel))
       (error "Channel %s is not displayed"
             (riece-identity-prefix riece-current-channel)))
                 riece-current-channel))
       (error "Channel %s is not displayed"
             (riece-identity-prefix riece-current-channel)))
+    (when (text-property-not-all
+          (riece-line-beginning-position) (riece-line-end-position)
+          'invisible nil)
+      (error "Invisible text included: %s"
+            (buffer-substring-no-properties
+             (riece-line-beginning-position)
+             (riece-line-end-position))))
     (when executing-kbd-macro
       (error "%s" "Forbidden to run keyboard macro"))))
 
     (when executing-kbd-macro
       (error "%s" "Forbidden to run keyboard macro"))))