Problems with unicode chars in GTK menus

[Ralf Angeli]

After executing the following code

(easy-menu-define test-menu (current-local-map) "doc"
  `("xxx"
    (,(concat (string (decode-char 'ucs 915)) " \\Gamma"))
    ("G \\Gamma")))

in an Emacs compiled with support for GTK menus, there will be a new
"xxx" menu with two entries.  I expected the first menu entry to show
an upper case gamma, a space and the string "\Gamma".  But the space
and the backslash don't come out right.  The characters look similar
to a "normal" space and backslash, but appear too wide.  You should
see this by comparing the first menu entry with the second.  The
latter shows a "normal" space and backslash.


In GNU Emacs 22.0.50.1 (i686-pc-linux-gnu, GTK+ Version 2.6.4)
 of 2005-05-18 on iwi71
Distributor `The XFree86 Project, Inc', version 11.0.40300001
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
  locale-coding-system: iso-latin-1
  default-enable-multibyte-characters: t

Major mode: Emacs-Lisp

Minor modes in effect:
  desktop-save-mode: t
  display-time-mode: t
  iswitchb-mode: t
  show-paren-mode: t
  encoded-kbd-mode: t
  mouse-wheel-mode: t
  auto-compression-mode: t
  menu-bar-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  blink-cursor-mode: t
  unify-8859-on-encoding-mode: t
  utf-translate-cjk-mode: t
  column-number-mode: t
  line-number-mode: t
  transient-mark-mode: t
  next-error-follow-minor-mode:  Fol

Recent input:
<down> <down> <down> <down> <down> <down> <down> C-k 
C-k C-k C-x C-s <left> <left> C-x C-e C-h v t e s t 
- m e n u <return> <help-echo> M-x r e p o r t - m 
e <backspace> <backspace> e m a <tab> <return>

Recent messages:
For information about the GNU Project and its goals, type C-h C-p.
Loading jit-lock...done
Loading cl-seq...done
Wrote /home/angeli/menu-test.el
Loading easymenu...done
((menu-item "xxx" (keymap "xxx" (Γ\ \\Gamma menu-item "Γ \\Gamma" (keymap "Γ 
\\Gamma")) (G\ \\Gamma menu-item "G \\Gamma" (keymap "G \\Gamma")))))
Loading help-fns...done
Loading pp...done
Type C-x 1 to remove help window.  C-M-v to scroll the help.
Loading emacsbug...done