Mercurial > emacs

changeset 111470:66c9a8999fbb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* lisp/progmodes/octave-mod.el (octave-mark-block): Update for smie change.
author Glenn Morris <rgm@gnu.org>
date Wed, 10 Nov 2010 00:21:06 -0800
parents 20c4d074b74d
children 5cb8f9659806
files lisp/ChangeLog lisp/progmodes/octave-mod.el
diffstat 2 files changed, 5 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Tue Nov 09 23:59:00 2010 -0800
+++ b/lisp/ChangeLog	Wed Nov 10 00:21:06 2010 -0800
@@ -1,5 +1,7 @@
 2010-11-10  Glenn Morris  <rgm@gnu.org>
 
+	* progmodes/octave-mod.el (octave-mark-block): Update for smie change.
+
 	* emulation/edt.el (edt-with-position): New macro.
 	(edt-find-forward, edt-find-backward, edt-find-next-forward)
 	(edt-find-next-backward, edt-sentence-forward, edt-sentence-backward)
--- a/lisp/progmodes/octave-mod.el	Tue Nov 09 23:59:00 2010 -0800
+++ b/lisp/progmodes/octave-mod.el	Wed Nov 10 00:21:06 2010 -0800
@@ -1,7 +1,7 @@
 ;;; octave-mod.el --- editing Octave source files under Emacs
 
-;; Copyright (C) 1997, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010
-;; Free Software Foundation, Inc.
+;; Copyright (C) 1997, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008,
+;;   2009, 2010  Free Software Foundation, Inc.
 
 ;; Author: Kurt Hornik <Kurt.Hornik@wu-wien.ac.at>
 ;; Author: John Eaton <jwe@octave.org>
@@ -829,7 +829,7 @@
   (unless (or (looking-at "\\s(")
               (save-excursion
                 (let* ((token (funcall smie-forward-token-function))
-                       (level (assoc token smie-op-levels)))
+                       (level (assoc token smie-grammar)))
                   (and level (null (cadr level))))))
     (backward-up-list 1))
   (mark-sexp))
@@ -1228,5 +1228,4 @@
 
 (provide 'octave-mod)
 
-;; arch-tag: 05f1ce09-be87-4c00-803e-4919ffa26c23
 ;;; octave-mod.el ends here