167 |
(put 'gomoku-mode 'front-sticky |
(put 'gomoku-mode 'front-sticky |
168 |
(put 'gomoku-mode 'rear-nonsticky '(intangible))) |
(put 'gomoku-mode 'rear-nonsticky '(intangible))) |
169 |
(put 'gomoku-mode 'intangible 1) |
(put 'gomoku-mode 'intangible 1) |
170 |
|
;; This one is for when they set view-read-only to t: Gomoku cannot |
171 |
|
;; allow View Mode to be activated in its buffer. |
172 |
|
(put 'gomoku-mode 'mode-class 'special) |
173 |
|
|
174 |
(defun gomoku-mode () |
(defun gomoku-mode () |
175 |
"Major mode for playing Gomoku against Emacs. |
"Major mode for playing Gomoku against Emacs. |