bug in insert-abbrev-table-description

[Frederik Fouvry]

Symptoms:

In a fresh emacs, evaluate the following

(define-abbrev global-abbrev-table "igb" "Sankt-Ingbert" nil 0 t)

Then type M-x edit-abbrevs, and then C-x C-s.  Emacs returns an error message 

Wrong type argument: integerp, (sys)

and (worse) all abbreviations are erased.

The reason seems to be the presence of "(sys)" in the buffer, for
system abbreviations.  It may be sufficient not to print "(sys)" when
the buffer is filled (I don't know how sys abbreviations can be
separated from user abbrevs in this case).  Alternatively, the system
abbreviations are not listed at all, or edit-abbrevs-mode is changed
to deal with the changed syntax.

In GNU Emacs 22.0.50.3 (i686-pc-linux-gnu, X toolkit, Xaw3d scroll bars)
 of 2005-03-22 on cc.at.coli.uni-sb.de
Distributor `The XFree86 Project, Inc', version 11.0.40201000
Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: POSIX
  value of $LC_CTYPE: en_GB.ISO8859-15
  value of $LC_MESSAGES: en_GB.ISO8859-15
  value of $LC_MONETARY: address@hidden
  value of $LC_NUMERIC: en_GB.ISO8859-15
  value of $LC_TIME: en_GB.ISO8859-15
  value of $LANG: en_GB.ISO8859-15
  locale-coding-system: iso-8859-15
  default-enable-multibyte-characters: t

Major mode: Edit-Abbrevs

Minor modes in effect:
  tooltip-mode: t
  mouse-wheel-mode: t
  menu-bar-mode: t
  blink-cursor-mode: t
  unify-8859-on-encoding-mode: t
  utf-translate-cjk-mode: t
  line-number-mode: t

Recent input:
e v t <backspace> - t a b l e SPC C-h f <return> " 
" <left> t e s t 1 <right> SPC " " SPC <left> <left> 
t e s t 1 1 1 1 1 <right> <right> n i l SPC 0 SPC t 
C-e <escape> C-g <down-mouse-1> <mouse-movement> <mouse-movement> 
<drag-mouse-1> <escape> : C-y <return> <escape> x e 
d i t - a b b <tab> <return> <escape> > C-x C-s C-x 
2 <help-echo> <help-echo> <help-echo> <help-echo> <help-echo> 
<help-echo> <help-echo> <help-echo> <help-echo> <help-echo> 
<help-echo> <help-echo> <help-echo> <help-echo> <help-echo> 
<help-echo> <help-echo> <help-echo> <help-echo> <help-echo> 
<help-echo> <menu-bar> <help-menu> <report-emacs-b
ug>

Recent messages:
Loading image...done
Quit
Loading help-fns...done
Type C-x 1 to remove help window.  C-M-v to scroll the help.
Making completion list...
Loading pp...done
"test1"
Mark set
define-abbrevs: Wrong type argument: integerp, (sys)
Loading emacsbug...done