aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorLeo Liu2013-05-02 01:25:03 +0800
committerLeo Liu2013-05-02 01:25:03 +0800
commit2640d52e4e7873e41b0f0f1144177f84c345917e (patch)
tree7df954078426bfc5caa362e186fcac8e151f2e0d
parentd8ef28b19d21b0fd021ceb6fe5e6ce392be63169 (diff)
downloademacs-2640d52e4e7873e41b0f0f1144177f84c345917e.tar.gz
emacs-2640d52e4e7873e41b0f0f1144177f84c345917e.zip
* progmodes/octave.el: Compatible with older emacs-24 releases.
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/progmodes/octave.el8
2 files changed, 11 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index aa2003a9aba..be8329a856c 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,7 +1,8 @@
12013-05-01 Leo Liu <sdl.web@gmail.com> 12013-05-01 Leo Liu <sdl.web@gmail.com>
2 2
3 * progmodes/octave.el (inferior-octave-has-built-in-variables): 3 * progmodes/octave.el: Compatible with older emacs-24 releases.
4 Remove. Buil-in variables were removed from Octave in 2007. 4 (inferior-octave-has-built-in-variables): Remove. Buil-in
5 variables were removed from Octave in 2007.
5 (inferior-octave-startup): Fix uses. 6 (inferior-octave-startup): Fix uses.
6 (comint-line-beginning-position): Remove compatibility code for 7 (comint-line-beginning-position): Remove compatibility code for
7 emacs 21. 8 emacs 21.
diff --git a/lisp/progmodes/octave.el b/lisp/progmodes/octave.el
index f12365552f9..4b02645e463 100644
--- a/lisp/progmodes/octave.el
+++ b/lisp/progmodes/octave.el
@@ -34,6 +34,14 @@
34;;; Code: 34;;; Code:
35(require 'comint) 35(require 'comint)
36 36
37;;; For emacs < 24.3.
38(require 'newcomment)
39(eval-when-compile
40 (unless (fboundp 'setq-local)
41 (defmacro setq-local (var val)
42 "Set variable VAR to value VAL in current buffer."
43 (list 'set (list 'make-local-variable (list 'quote var)) val))))
44
37(defgroup octave nil 45(defgroup octave nil
38 "Editing Octave code." 46 "Editing Octave code."
39 :link '(custom-group-link :tag "Font Lock Faces group" font-lock-faces) 47 :link '(custom-group-link :tag "Font Lock Faces group" font-lock-faces)