# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 756617290 0
# Node ID 9e91acab81e9ce9e6e2c5305da64e60452b352d8
# Parent  c9578602cc6144a7d65a5e8a7e391a6b739a3dbe
(isearch-text-char-description): Treat TAB as ctl char.

(isearch-text-char-description): Really call
text-char-description for ctl chars.

diff -r c9578602cc61 -r 9e91acab81e9 lisp/isearch.el
--- a/lisp/isearch.el	Thu Dec 23 03:26:46 1993 +0000
+++ b/lisp/isearch.el	Thu Dec 23 03:28:10 1993 +0000
@@ -4,7 +4,7 @@
 
 ;; Author: Daniel LaLiberte <liberte@cs.uiuc.edu>
 
-;; |$Date: 1993/11/24 01:22:40 $|$Revision: 1.53 $
+;; |$Date: 1993/11/26 22:20:23 $|$Revision: 1.55 $
 
 ;; This file is part of GNU Emacs.
 
@@ -1365,7 +1365,9 @@
       (make-string 1 (event-to-character c)))))
 
 (defun isearch-text-char-description (c)
-  (isearch-char-to-string c))
+  (if (and (integerp c) (or (< c ?\ ) (= c ?\^?)))
+      (text-char-description c)
+    (isearch-char-to-string c)))
 
 (defun isearch-unread (&rest char-or-events)
   ;; General function to unread characters or events.