[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master e10e314 2/2: use view-mode on score file for ease o
From: |
Sam Steingold |
Subject: |
[Emacs-diffs] master e10e314 2/2: use view-mode on score file for ease of scrolling and quitting |
Date: |
Thu, 2 May 2019 10:19:19 -0400 (EDT) |
branch: master
commit e10e314e2b7583d892e86cee92ec57d3a1030ce4
Author: Sam Steingold <address@hidden>
Commit: Sam Steingold <address@hidden>
use view-mode on score file for ease of scrolling and quitting
---
lisp/play/gamegrid.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/lisp/play/gamegrid.el b/lisp/play/gamegrid.el
index 4a9dac7..54eeafd 100644
--- a/lisp/play/gamegrid.el
+++ b/lisp/play/gamegrid.el
@@ -663,6 +663,7 @@ FILE is created there."
(revert-buffer nil t nil)
(display-buffer buf))
(find-file-read-only target))
+ (view-mode)
(goto-char (point-min))
(search-forward (concat (int-to-string score)
" " (user-login-name) " "
@@ -691,7 +692,8 @@ FILE is created there."
(forward-line gamegrid-score-file-length)
(delete-region (point) (point-max))
(setq buffer-read-only t)
- (save-buffer)))
+ (save-buffer)
+ (view-mode)))
;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;