[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[ELPA-diffs] /srv/bzr/emacs/elpa r376: * sokoban.el (sokoban-init-level-
From: |
Leo Liu |
Subject: |
[ELPA-diffs] /srv/bzr/emacs/elpa r376: * sokoban.el (sokoban-init-level-data): Compatibility fix. |
Date: |
Thu, 28 Mar 2013 21:36:16 +0800 |
User-agent: |
Bazaar (2.5.0) |
------------------------------------------------------------
revno: 376
author: Syohei YOSHIDA <address@hidden>
committer: Leo Liu <address@hidden>
branch nick: elpa
timestamp: Thu 2013-03-28 21:36:16 +0800
message:
* sokoban.el (sokoban-init-level-data): Compatibility fix.
modified:
packages/sokoban/sokoban.el
=== modified file 'packages/sokoban/sokoban.el'
--- a/packages/sokoban/sokoban.el 2013-03-04 01:19:23 +0000
+++ b/packages/sokoban/sokoban.el 2013-03-28 13:36:16 +0000
@@ -428,7 +428,9 @@
(defun sokoban-init-level-data ()
(setq sokoban-level-data nil)
(with-current-buffer (find-file-noselect sokoban-level-file)
- (read-only-mode 1)
+ (if (fboundp 'read-only-mode)
+ (read-only-mode 1)
+ (setq buffer-read-only t))
(goto-char (point-min))
(re-search-forward sokoban-level-regexp nil t)
(forward-char)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [ELPA-diffs] /srv/bzr/emacs/elpa r376: * sokoban.el (sokoban-init-level-data): Compatibility fix.,
Leo Liu <=