Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Fixed ne2wm:toggle-sauron

  • Loading branch information...
commit 19d78e787c1f0afed5b7afab6817ddfdc5179930 1 parent 70e2089
@tkf authored
Showing with 5 additions and 1 deletion.
  1. +5 −1 ne2wm-toggle-sauron.el
View
6 ne2wm-toggle-sauron.el
@@ -33,7 +33,11 @@
When the prefix argument is given, visit the *Sauron Log buffer*."
(interactive "P")
(let ((sauron-separate-frame nil)
- (target-buffer (if log-buffer sr-log-buffer-name sr-buffer-name)))
+ (target-buffer
+ (let ((buffer-name (buffer-name)))
+ (if (member buffer-name (list sr-log-buffer-name sr-buffer-name))
+ buffer-name
+ (if log-buffer sr-log-buffer-name sr-buffer-name)))))
(ne2wm:toggle-buffer-with-callbacks
target-buffer
#'sauron-start)))
Please sign in to comment.
Something went wrong with that request. Please try again.