* doc-view.el (doc-view-search-backward, doc-view-search): Fix

assignment to free variable bug.

2 files changed, 7 insertions, 2 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 24c578e1dfd..9da728cd8be 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2007-11-16  Tassilo Horn  <tassilo@member.fsf.org>
+
+        * doc-view.el (doc-view-search-backward, doc-view-search): Fix
+        assignment to free variable bug.
+
 2007-11-16  Martin Pohlack  <mp26@os.inf.tu-dresden.de>  (tiny change)
 
         * emulation/pc-select.el (pc-select-shifted-mark): New var.
diff --git a/lisp/doc-view.el b/lisp/doc-view.el
index 44c6871b734..5443bc3672e 100644
--- a/lisp/doc-view.el
+++ b/lisp/doc-view.el
@@ -787,7 +787,7 @@ the pagenumber and CONTEXTS are all lines of text containing a match."
   "Call `doc-view-search' for backward search.
 If prefix NEW-QUERY is given, ask for a new regexp."
   (interactive "P")
-  (doc-view-search arg t))
+  (doc-view-search new-query t))
 
 (defun doc-view-search (new-query &optional backward)
   "Jump to the next match or initiate a new search if NEW-QUERY is given.
@@ -795,7 +795,7 @@ If the current document hasn't been transformed to plain text
 till now do that first.
 If BACKWARD is non-nil, jump to the previous match."
   (interactive "P")
-  (if (and (not arg)
+  (if (and (not new-query)
            doc-view-current-search-matches)
       (if backward
           (doc-view-search-previous-match 1)