Skip to content


Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Better ne2wm:select-sub(-tail)

  • Loading branch information...
commit ae7f5e706865e8195c111dc5406a6bd5206cc613 1 parent e7f608c
@tkf authored
Showing with 2 additions and 0 deletions.
  1. +2 −0  ne2wm-utils.el
2  ne2wm-utils.el
@@ -81,11 +81,13 @@ will be shown in the next window."
(defun ne2wm:select-sub ()
"Focus e2wm sub window."
+ (ne2wm:record-main-window)
(let ((wm (e2wm:pst-get-wm)))
(wlf:select wm 'sub)))
(defun ne2wm:popup-sub-tail (buffer)
"Popup BUFFER in sub window and `recenter' at the bottom of the window."
+ (ne2wm:record-main-window)
(e2wm:pst-buffer-set 'sub buffer t t)
(set-window-point (selected-window) (point-max))
(recenter -2))
Please sign in to comment.
Something went wrong with that request. Please try again.