`set-locale-environment' bug

[Jesper Harder]

Steps to reproduce:

1. Start Emacs in a en_US.iso88591 locale:

   LANG=en_US.iso88591 emacs -q --no-site-file

2. Evaluate:

   (setq standard-display-table nil)

3. Evaluating this expression:

   (set-locale-environment)

results in the following backtrace:

Debugger entered--Lisp error: (wrong-type-argument arrayp nil)
  aset(nil 160 [160])
  (if (and (>= l 32) (< l 127)) (aset standard-display-table l nil) (aset 
standard-display-table l (vector l)))
  (while (<= l h) (if (and ... ...) (aset standard-display-table l nil) (aset 
standard-display-table l ...)) (setq l (1+ l)))
  standard-display-8bit(160 255)
  standard-display-european-internal()
  set-display-table-and-terminal-coding-system("Latin-1")
  set-locale-environment("en_US.iso88591")
  eval((set-locale-environment "en_US.iso88591"))
  eval-last-sexp-1(t)
  eval-last-sexp(t)
  eval-print-last-sexp()
  call-interactively(eval-print-last-sexp)


By the way, the node "(elisp)Active Display Table" states that the
default value for `standard-display-table' is nil.

This isn't correct since the default value depends on the locale -- it
is non-nil in the above locale.




In GNU Emacs 21.3.50.62 (i686-pc-linux-gnu, GTK+ Version 2.0.2)
 of 2003-10-26 on defun.localdomain
configured using `configure '--with-gtk''

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: en_US.iso88591
  locale-coding-system: nil
  default-enable-multibyte-characters: t