cperl-mode inserts TAB despite indent-tabs-mode

[Eric Hanchrow]

This bug report will be sent to the Free Software Foundation,
not to your local site managers!
Please write in English if possible, because the Emacs maintainers
usually do not have translators to read other languages for them.

Your bug report will be posted to the address@hidden mailing list.

Please describe exactly what actions triggered the bug
and the precise symptoms of the bug:

Save the below into a file named bug.el:

======================================== cut here 
========================================
(setq inhibit-startup-message t)
(switch-to-buffer "perl test")
(cperl-mode)
(setq indent-tabs-mode nil)
(auto-fill-mode 1)
(insert "{
  {
    {
      {
        my %bob = (
                   foo => 'bar' # This is a long comment, which will hopefully 
get broken. Eventually.
                  );
      }
    }
  }
}
")
(goto-line 6)
(end-of-line)
(fill-paragraph 0)
(message (substitute-command-keys "Now do \\[isearch-forward] TAB."))
(sit-for 0)
======================================== cut here 
========================================

Run emacs -q --no-site-file --load=bug.el
Follow the instructions in the echo area
Note that you have indeed found a tab character

There should be only spaces there, since indent-tabs-mode is nil.

In GNU Emacs 21.3.50.1 (i386-mingw-nt5.0.2195)
 of 2004-03-22 on SLOP
configured using `configure --with-gcc (3.2)'

Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: nil
  locale-coding-system: iso-latin-1
  default-enable-multibyte-characters: t

Major mode: Shell

Minor modes in effect:
  desktop-save-mode: t
  display-time-mode: t
  auto-compression-mode: t
  iswitchb-mode: t
  mouse-wheel-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  unify-8859-on-encoding-mode: t
  line-number-mode: t

Recent input:
c k w a r d ] SPC C - t C-a C-M-d C-M-f C-f M-1 M-( 
s u b s t i t u d e - c o m m a n d - k e y s SPC C-x 
C-s C-x o M-p <return> C-x o C-a C-M-d C-M-d M-f C-b 
<backspace> t C-x C-s C-x o M-p <return> C-x o M-f 
M-f M-f M-f M-f M-f M-f <M-backspace> f o r w a r d 
M-f <M-backspace> M-d T A B C-x C-s C-x o M-p <return> 
M-x r e p o <tab> r <tab> <return>

Recent messages:
Wrote d:/cygwin/tmp/bug.el
History item: 1
Wrote d:/cygwin/tmp/bug.el
History item: 1
Wrote d:/cygwin/tmp/bug.el
History item: 1
Wrote d:/cygwin/tmp/bug.el
History item: 1
Making completion list...
Loading emacsbug...done

-- 
The whole point of loud music is to make it possible
to date without talking.
        -- Roger Ebert