aboutsummaryrefslogtreecommitdiffhomepage
path: root/etc/emacsbugs
diff options
context:
space:
mode:
Diffstat (limited to 'etc/emacsbugs')
-rw-r--r--etc/emacsbugs/visiblity-attempt.el14
1 files changed, 14 insertions, 0 deletions
diff --git a/etc/emacsbugs/visiblity-attempt.el b/etc/emacsbugs/visiblity-attempt.el
new file mode 100644
index 00000000..e6cc8c07
--- /dev/null
+++ b/etc/emacsbugs/visiblity-attempt.el
@@ -0,0 +1,14 @@
+(defvar vis nil)
+(defun toggle-invis ()
+ (interactive)
+ (if vis (add-to-invisibility-spec 'myvis . t))
+ (remove-from-invisibility-spec '(myvis . t)))
+ (setq vis (not vis)))
+(overlay-put (make-overlay (point-min) (point)) 'invisible 'myvis)(defvar vis nil)
+(defun toggle-invis ()
+ (interactive)
+ (if vis (add-to-invisibility-spec '(myvis . t))
+ (remove-from-invisibility-spec '(myvis . t)))
+ (setq vis (not vis)))
+(overlay-put (make-overlay (point-min) (point)) 'invisible 'myvis)
+