diff options
author | dx <aryadevchavali1@gmail.com> | 2020-05-10 18:01:37 +0100 |
---|---|---|
committer | dx <aryadevchavali1@gmail.com> | 2020-05-10 18:01:37 +0100 |
commit | f4ad02ef8102f9955583609daaf98753a747db01 (patch) | |
tree | 786cdd092d8e04ee24204982ebecf9bc4973c16b /Doom/.doom.d/modules/private/narrow/config.el | |
parent | 786b21b01941cb37f0673260f5a23816d85580b0 (diff) | |
download | dotfiles-f4ad02ef8102f9955583609daaf98753a747db01.tar.gz dotfiles-f4ad02ef8102f9955583609daaf98753a747db01.tar.bz2 dotfiles-f4ad02ef8102f9955583609daaf98753a747db01.zip |
+narrowing module, from narrowing handler in config.org
Diffstat (limited to 'Doom/.doom.d/modules/private/narrow/config.el')
-rw-r--r-- | Doom/.doom.d/modules/private/narrow/config.el | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/Doom/.doom.d/modules/private/narrow/config.el b/Doom/.doom.d/modules/private/narrow/config.el new file mode 100644 index 0000000..9afd513 --- /dev/null +++ b/Doom/.doom.d/modules/private/narrow/config.el @@ -0,0 +1,14 @@ +;;; private/narrow/config.el -*- lexical-binding: t; -*- + +(defvar +narrow/narrow-state 't "To narrow or not to narrow. Flips between t and nil") + +(defun +narrow/toggle-narrow-state () + "Toggle the state of +narrow/narrow-state between 't and 'nil" + (if (= +narrow/narrow-state 't) + (setq +narrow/narrow-state nil) + (setq +narrow/narrow-state 't))) + +(defun +narrow/toggle-narrow () + (interactive) + (cond ((+narrow/narrow-state) (narrow-to-defun) (+narrow/toggle-narrow-state)) + (t (widen)))) |