X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/90a6f8d0741eb5391c204f059c845c361e615b49..2aa6b47e3e216410195cf7ec3abb5902f38082fa:/lisp/progmodes/octave.el

diff --git a/lisp/progmodes/octave.el b/lisp/progmodes/octave.el
index b54b88dccb..f309565acf 100644
--- a/lisp/progmodes/octave.el
+++ b/lisp/progmodes/octave.el
@@ -1,6 +1,6 @@
 ;;; octave.el --- editing octave source files under emacs  -*- lexical-binding: t; -*-
 
-;; Copyright (C) 1997, 2001-2015 Free Software Foundation, Inc.
+;; Copyright (C) 1997, 2001-2016 Free Software Foundation, Inc.
 
 ;; Author: Kurt Hornik <Kurt.Hornik@wu-wien.ac.at>
 ;;	   John Eaton <jwe@octave.org>
@@ -1088,7 +1088,7 @@ The value is (START END NAME-START NAME-END) of the function."
   (save-excursion
     (goto-char (point-min))
     (when (equal (funcall smie-forward-token-function) "function")
-      (forward-word -1)
+      (forward-word-strictly -1)
       (let* ((start (point))
              (end (progn (forward-sexp 1) (point)))
              (name (when (progn