188 |
(put 'gomoku-mode 'front-sticky |
(put 'gomoku-mode 'front-sticky |
189 |
(put 'gomoku-mode 'rear-nonsticky '(intangible))) |
(put 'gomoku-mode 'rear-nonsticky '(intangible))) |
190 |
(put 'gomoku-mode 'intangible 1) |
(put 'gomoku-mode 'intangible 1) |
191 |
|
;; This one is for when they set view-read-only to t: Gomoku cannot |
192 |
|
;; allow View Mode to be activated in its buffer. |
193 |
|
(put 'gomoku-mode 'mode-class 'special) |
194 |
|
|
195 |
(define-derived-mode gomoku-mode nil "Gomoku" |
(define-derived-mode gomoku-mode nil "Gomoku" |
196 |
"Major mode for playing Gomoku against Emacs. |
"Major mode for playing Gomoku against Emacs. |