Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!tut.cis.ohio-state.edu!UUNET.UU.NET!talos!kjones
From: talos!kjones@UUNET.UU.NET (Kyle Jones)
Newsgroups: gnu.emacs.bug
Subject: looking-at bug
Message-ID: <8904231805.AA17296@talos.uucp>
Date: 23 Apr 89 18:05:38 GMT
Sender: daemon@tut.cis.ohio-state.edu
Reply-To: kyle@odu.edu
Distribution: gnu
Organization: GNUs Not Usenet
Lines: 25

GNU Emacs 18.51 running under Sun UNIX Release 3.5 on a Sun 3/60.

The function looking-at fails inappropriately.

Repeat by running "emacs -q", using M-x load-file to load a file containing
this function definition:

(defun bug-test ()
  (interactive)
  (set-buffer (generate-new-buffer "*BUG TEST*"))
  (insert "\200")
  (forward-char -1)
  (if (looking-at "\200")
      (message "looking-at bug not present")
    (message "looking-at bug present on your system"))
  (kill-buffer (current-buffer)))

and then running M-x bug-test.

I have reproduced the buggy behavior only on Suns, a 3/60 and a 3/160,
both running release 3.5.  The bug does not appear on our Vaxen, but
they are running version 18.52 under Ultrix 3.0.

If you put (setq case-fold-search nil) just before the call to looking-at,
the buggy behavior goes away.