(isearch-highlight): Do nothing if not window-system.

f5f6a944 · Richard M. Stallman · 7a8e3e30 · f5f6a944
Commit f5f6a944 authored Jan 21, 1994 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 2 deletions

lisp/isearch.el lisp/isearch.el +2 -2

No files found.
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -4,7 +4,7 @@

 ;; Author: Daniel LaLiberte <liberte@cs.uiuc.edu>

-;; |$Date: 1994/01/16 23:40:50 $|$Revision: 1.62 $
+;; |$Date: 1994/01/19 18:45:34 $|$Revision: 1.63 $

 ;; This file is part of GNU Emacs.

@@ -1360,7 +1360,7 @@ If there is no completion possible, say so and continue searching."
 (defvar isearch-overlay nil)

 (defun isearch-highlight (beg end)
-  (if (null search-highlight)
+  (if (or (null search-highlight) (null window-system))
      nil
    (or isearch-overlay (setq isearch-overlay (make-overlay beg end)))
    (move-overlay isearch-overlay beg end (current-buffer))