##// END OF EJS Templates
mq.el: don't fill half the screen with a single line of output.
Bryan O'Sullivan -
r4428:fa51e661 default
parent child Browse files
Show More
@@ -147,7 +147,8 b' If PATCH is nil, push at most one patch.'
147 (if patch (list patch))))
147 (if patch (list patch))))
148 last-line (mq-last-line))
148 last-line (mq-last-line))
149 (let ((lines (count-lines (point-min) (point-max))))
149 (let ((lines (count-lines (point-min) (point-max))))
150 (if (and (equal lines 2) (string-match "Now at:" last-line))
150 (if (or (<= lines 1)
151 (and (equal lines 2) (string-match "Now at:" last-line)))
151 (progn
152 (progn
152 (kill-buffer (current-buffer))
153 (kill-buffer (current-buffer))
153 (delete-window))
154 (delete-window))
General Comments 0
You need to be logged in to leave comments. Login now