diff options
| author |  David Aspinall <da@inf.ed.ac.uk> | 2009-09-29 14:50:24 +0000 |
|---|---|---|
| committer | David Aspinall <da@inf.ed.ac.uk> | 2009-09-29 14:50:24 +0000 |
| commit | 6d929429e10fd6b719bb253ce129edd07da126b0 (patch) | |
| tree | 4279f20ecb9e198829f9470d492335ede27a4b7a | |
| parent | 6036a445eb399d5e6fd9e52572e6b2e585665913 (diff) | |
Clean up hints about buffer display
| -rw-r--r-- | generic/pg-user.el | 16 | ||||
| -rw-r--r-- | generic/proof-menu.el | 2 |
2 files changed, 9 insertions, 9 deletions
diff --git a/generic/pg-user.el b/generic/pg-user.el index 802a3692..af1a53cf 100644 --- a/generic/pg-user.el +++ b/generic/pg-user.el @@ -910,15 +910,15 @@ If NUM is negative, move upwards. Return new span." ;;;###autoload (defun pg-response-buffers-hint (&optional nextbuf) - (unless (or proof-multiple-frames-enable - proof-three-window-enable - (not (buffer-live-p proof-goals-buffer))) - (pg-hint - (format - "\\[proof-prf] for goals;%s \\[proof-layout-windows] refreshes" + (unless (not (buffer-live-p proof-goals-buffer)) + (pg-hint + (format + "\\[proof-prf] for goals;%s \\[proof-layout-windows] refreshes" + (if (or proof-three-window-enable + proof-multiple-frames-enable) + "" (format " \\[proof-display-some-buffers] rotates output%s;" - (if nextbuf (concat " (next:" nextbuf ")") "")) - "")))) + (if nextbuf (concat " (next:" nextbuf ")") ""))))))) ;;;###autoload (defun pg-jump-to-end-hint () diff --git a/generic/proof-menu.el b/generic/proof-menu.el index 820e1544..9e4d5e86 100644 --- a/generic/proof-menu.el +++ b/generic/proof-menu.el @@ -81,7 +81,7 @@ without adjusting window layout." (if (eq selectedbuf proof-response-buffer) (set-window-point (get-buffer-window proof-response-buffer t) (point-max))) - (pg-hint (pg-response-buffers-hint (buffer-name nextbuf))))))) + (pg-response-buffers-hint (buffer-name nextbuf)))))) |