diff options
| author | Stefan Monnier | 2015-06-24 16:39:52 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2015-06-24 16:39:52 -0400 |
| commit | ce2e5c7f79df609306158a8a43c3a07af364e1df (patch) | |
| tree | 811b108c98f9631f1eb48b76eeece97040853a7d | |
| parent | 4fba36ce11978892dcd4f566b528e57ae12e5bf3 (diff) | |
| download | emacs-ce2e5c7f79df609306158a8a43c3a07af364e1df.tar.gz emacs-ce2e5c7f79df609306158a8a43c3a07af364e1df.zip | |
* lisp/subr.el (remove-from-invisibility-spec): Handle the t case
* lisp/subr.el (remove-from-invisibility-spec): Make sure `element'
is visible even if it's not yet in buffer-invisibility-spec (bug#20468).
| -rw-r--r-- | lisp/subr.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/subr.el b/lisp/subr.el index 5d40aaae41c..535fa2d3d0e 100644 --- a/lisp/subr.el +++ b/lisp/subr.el | |||
| @@ -4066,9 +4066,10 @@ that can be added." | |||
| 4066 | 4066 | ||
| 4067 | (defun remove-from-invisibility-spec (element) | 4067 | (defun remove-from-invisibility-spec (element) |
| 4068 | "Remove ELEMENT from `buffer-invisibility-spec'." | 4068 | "Remove ELEMENT from `buffer-invisibility-spec'." |
| 4069 | (if (consp buffer-invisibility-spec) | 4069 | (setq buffer-invisibility-spec |
| 4070 | (setq buffer-invisibility-spec | 4070 | (if (consp buffer-invisibility-spec) |
| 4071 | (delete element buffer-invisibility-spec)))) | 4071 | (delete element buffer-invisibility-spec) |
| 4072 | (list t)))) | ||
| 4072 | 4073 | ||
| 4073 | ;;;; Syntax tables. | 4074 | ;;;; Syntax tables. |
| 4074 | 4075 | ||