Add the following comment to add-on modules.

[riece] / lisp / riece-foolproof.el

diff --git a/lisp/riece-foolproof.el b/lisp/riece-foolproof.el
index f691a0a..aa7bb86 100644 (file)
--- a/lisp/riece-foolproof.el
+++ b/lisp/riece-foolproof.el
@@ -23,10 +23,7 @@
 
 ;;; Commentary:
 
-;; This add-on channel miss hold in check
-
-;; To use, add the following line to your ~/.riece/init.el:
-;; (add-to-list 'riece-addons 'riece-foolproof)
+;; NOTE: This is an add-on module for Riece.
 
 ;;; Code:
 
@@ -51,6 +48,13 @@
                 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"))))