[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/gnugo f29b22f 081/357: [gnugo int] Use ‘setq’ less.
From: |
Stefan Monnier |
Subject: |
[elpa] externals/gnugo f29b22f 081/357: [gnugo int] Use ‘setq’ less. |
Date: |
Sun, 29 Nov 2020 14:50:54 -0500 (EST) |
branch: externals/gnugo
commit f29b22fa48eb02d2dda697b1938b792fe1dda8aa
Author: Thien-Thi Nguyen <ttn@gnu.org>
Commit: Thien-Thi Nguyen <ttn@gnu.org>
[gnugo int] Use ‘setq’ less.
* packages/gnugo/gnugo.el (gnugo-board-mode): ...here.
---
gnugo.el | 13 ++++++-------
1 file changed, 6 insertions(+), 7 deletions(-)
diff --git a/gnugo.el b/gnugo.el
index d92eea5..a332864 100644
--- a/gnugo.el
+++ b/gnugo.el
@@ -1692,12 +1692,12 @@ In this mode, keys do not self insert.
(switch-to-buffer (generate-new-buffer "(Uninitialized GNUGO Board)"))
(buffer-disable-undo) ; todo: undo undo undoing
(kill-all-local-variables)
- (setq truncate-lines t)
(use-local-map gnugo-board-mode-map)
(set (make-local-variable 'font-lock-defaults)
'(gnugo-font-lock-keywords t))
- (setq major-mode 'gnugo-board-mode)
- (setq mode-name "GNUGO Board")
+ (setq major-mode 'gnugo-board-mode
+ mode-name "GNUGO Board"
+ truncate-lines t)
(add-hook 'kill-buffer-hook 'gnugo-cleanup nil t)
(set (make-local-variable 'gnugo-state)
(make-hash-table :size (1- 42) :test 'eq))
@@ -1732,7 +1732,6 @@ In this mode, keys do not self insert.
(args (read-string "GNU Go options: "
(car gnugo-option-history)
'gnugo-option-history))
- (rules "Japanese")
proc
board-size user-color handicap komi minus-l infile)
(dolist (x '((board-size 19 "--boardsize")
@@ -1750,8 +1749,6 @@ In this mode, keys do not self insert.
(if rx s (string-to-number s))))
default))))
(gnugo-put :user-color user-color)
- (when (string-match "--chinese-rules" args)
- (setq rules "Chinese"))
(let ((proc-args (split-string args)))
(gnugo-put :proc-args proc-args)
(gnugo-put :proc (setq proc (apply 'start-process "gnugo"
@@ -1784,7 +1781,9 @@ In this mode, keys do not self insert.
(mapc (lambda (x) (apply 'gnugo-note x))
`((:SZ ,board-size)
(:DT ,(format-time-string "%Y-%m-%d"))
- (:RU ,rules)
+ (:RU ,(if (string-match "--chinese-rules" args)
+ "Chinese"
+ "Japanese"))
(:AP ("gnugo.el" . ,gnugo-version))
(:KM ,komi)
(,(if g-blackp :PW :PB) ,(user-full-name))
- [elpa] externals/gnugo 8203f46 194/357: [gnugo int] Centralize some constant strings., (continued)
- [elpa] externals/gnugo 8203f46 194/357: [gnugo int] Centralize some constant strings., Stefan Monnier, 2020/11/29
- [elpa] externals/gnugo b1f2856 183/357: [gnugo] Fix bug: Keep subproc informed of forced PASS., Stefan Monnier, 2020/11/29
- [elpa] externals/gnugo 3112192 056/357: [gnugo int] Streamline subproc (de-)marshalling., Stefan Monnier, 2020/11/29
- [elpa] externals/gnugo 294bdc1 047/357: [gnugo maint] Update NEWS; nfc., Stefan Monnier, 2020/11/29
- [elpa] externals/gnugo b5f47cb 059/357: [gnugo int] Use ‘pcase’ more., Stefan Monnier, 2020/11/29
- [elpa] externals/gnugo 8cabdfa 042/357: [gnugo int] Use internal macros more., Stefan Monnier, 2020/11/29
- [elpa] externals/gnugo b484515 064/357: [gnugo int] Use ‘loop’, functional style more., Stefan Monnier, 2020/11/29
- [elpa] externals/gnugo a7dffa0 067/357: [gnugo maint] Update NEWS; nfc., Stefan Monnier, 2020/11/29
- [elpa] externals/gnugo d2b4549 068/357: [gnugo] Bind ‘M-u’ to ‘gnugo-undo-one-move’., Stefan Monnier, 2020/11/29
- [elpa] externals/gnugo f82c526 078/357: [gnugo int] Use ‘following-char’ instead of ‘char-after’., Stefan Monnier, 2020/11/29
- [elpa] externals/gnugo f29b22f 081/357: [gnugo int] Use ‘setq’ less.,
Stefan Monnier <=
- [elpa] externals/gnugo 38137d3 079/357: [gnugo int] Cache gametree prop ‘:SZ’ as gnugo prop ‘:SZ’., Stefan Monnier, 2020/11/29
- [elpa] externals/gnugo d6f3956 089/357: [gnugo int] Decruft: Infer MOVEP from PROPERTY., Stefan Monnier, 2020/11/29
- [elpa] externals/gnugo 5ca5b0a 097/357: [gnugo int] Add abstraction: gnugo--nodep, Stefan Monnier, 2020/11/29
- [elpa] externals/gnugo a86a897 013/357: [gnugo int] Use ‘redisplay’ more., Stefan Monnier, 2020/11/29
- [elpa] externals/gnugo 3063f95 041/357: [gnugo] Make proc-status change mode-line elem more informative., Stefan Monnier, 2020/11/29
- [elpa] externals/gnugo c2f7717 053/357: [gnugo slog] Fix bug: Avoid ‘cl-lib’ funcs; use only macros., Stefan Monnier, 2020/11/29
- [elpa] externals/gnugo 02926a1 049/357: [gnugo] Rename var to ‘gnugo-inhibit-refresh’., Stefan Monnier, 2020/11/29
- [elpa] externals/gnugo 5e4b5a8 051/357: [gnugo] Release: 2.3.0, Stefan Monnier, 2020/11/29
- [elpa] externals/gnugo 400e27d 069/357: [gnugo int] Add abstraction: gnugo--who-is-who, Stefan Monnier, 2020/11/29
- [elpa] externals/gnugo 3547cbe 080/357: [gnugo int] Add abstraction: gnugo--set-root-prop, Stefan Monnier, 2020/11/29