From d74a158186bb0fa8e5bdbedb7754dd873abab9a9 Mon Sep 17 00:00:00 2001 From: Leo Liu Date: Fri, 3 May 2013 15:52:17 +0800 Subject: [PATCH] * progmodes/octave.el (user-error): Alias to error if not defined. --- lisp/ChangeLog | 1 + lisp/progmodes/octave.el | 3 +++ 2 files changed, 4 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d90caded30..a2719a2ebf 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -8,6 +8,7 @@ (octave-help-file, octave-help-function): New button types. (octave-help): New command and bind it to C-h ;. (octave-find-definition): New command and bind it to M-. + (user-error): Alias to error if not defined. 2013-05-02 Leo Liu diff --git a/lisp/progmodes/octave.el b/lisp/progmodes/octave.el index 3fe8403000..10f6007204 100644 --- a/lisp/progmodes/octave.el +++ b/lisp/progmodes/octave.el @@ -36,6 +36,9 @@ ;;; For emacs < 24.3. (require 'newcomment) +(eval-and-compile + (unless (fboundp 'user-error) + (defalias 'user-error 'error))) (eval-when-compile (unless (fboundp 'setq-local) (defmacro setq-local (var val) -- 2.20.1