* progmodes/verilog-mode.el (verilog-forward-sexp): Avoid free variable.

2 files changed, 8 insertions, 3 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f3fd06f1220..4fe7bdca807 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2010-04-15  Glenn Morris  <rgm@gnu.org>
+
+        * progmodes/verilog-mode.el (verilog-forward-sexp): Avoid free variable.
+
 2010-04-15  Juanma Barranquero  <lekktu@gmail.com>
 
         Simplify by using `define-derived-mode'.
diff --git a/lisp/progmodes/verilog-mode.el b/lisp/progmodes/verilog-mode.el
index 05ce36c56d2..1ec5ab90ac7 100644
--- a/lisp/progmodes/verilog-mode.el
+++ b/lisp/progmodes/verilog-mode.el
@@ -2611,7 +2611,7 @@ Use filename, if current buffer being edited shorten to just buffer name."
             (if (or
                  (looking-at verilog-disable-fork-re)
                  (and (looking-at "fork")
-                      (progn 
+                      (progn
                         (setq here (point)) ;; sometimes a fork is just a fork
                         (forward-word -1)
                         (looking-at verilog-disable-fork-re))))
@@ -2670,7 +2670,8 @@ Use filename, if current buffer being edited shorten to just buffer name."
                (forward-word 1))
           (catch 'skip
             (if (eq nest 'yes)
-                (let ((depth 1))
+                (let ((depth 1)
+                      here)
                   (while (verilog-re-search-forward reg nil 'move)
                     (cond
                      ((match-end md) ; a closer in regular expression, so we are climbing out
@@ -2686,7 +2687,7 @@ Use filename, if current buffer being edited shorten to just buffer name."
                        ((if (or
                              (looking-at verilog-disable-fork-re)
                              (and (looking-at "fork")
-                                  (progn 
+                                  (progn
                                     (forward-word -1)
                                     (looking-at verilog-disable-fork-re))))
                             (progn ;; it is a disable fork; another false alarm