Re: ask help for the problem of integrep (48 . 57)

[Guo Wei-Wei]

I find when I delete " (require 'table) " from .emacs , the the wrong message of "map-char-table: Wrong type argument: integerp, (127 . 127)" is gone. Then both the wrong message of "map-char-table: Wrong type argument: integerp, (127 . 127)" and the wrong message of "map-char-table: Wrong type argument: integerp, (48 . 57)" are caused by 
table.el. 

But there is a wired thing. When I use " M-x load-file <RET> ..../table.el <RET>", there is no wrong message. But when I want to insert a table with " M-x table-insert <RET> <RET> <RET> <RET> <RET> ", instead of the wrong message of "map-char-table: Wrong type argument: integerp, (48 . 57)", the wrong message of "map-char-table: Wrong type argument: integerp, (127 . 127)" comes.

I'm not in a Latin based environment. My LANG is set to zh_CN.UTF-8, UTF-8 of Chinese. I only set

(prefer-coding-system 'gb18030)
(prefer-coding-system 'utf-8)


Here is the debugging information for "map-char-table: Wrong type argument: integerp, (127 . 127)" .

Debugger entered--Lisp error: (wrong-type-argument integerp (127 . 127))
  aset(#^[nil nil keymap #^^[3 0 pop-global-mark nil list-buffers save-buffers-kill-emacs list-directory eval-last-sexp find-file nil nil indent-rigidly nil table-cell-map-kmacro-keymap downcase-region (keymap ... ... ... ... ... ... ... ... ... ... ...) set-goal-column delete-blank-lines mark-page toggle-read-only find-file-read-only save-buffer transpose-lines upcase-region find-alternate-file write-file exchange-point-and-mark nil iconify-or-deiconify-frame (keymap ... ...) nil nil nil nil nil nil nil nil set-selective-display nil nil expand-abbrev kmacro-start-macro kmacro-end-macro calc-dispatch balance-windows nil shrink-window-if-larger-than-buffer set-fill-prefix point-to-register-compatibility-binding ...] #^^[1 0 #^^[2 0 #^^[3 0 pop-global-mark nil list-buffers save-buffers-kill-emacs list-directory eval-last-sexp find-file nil nil indent-rigidly nil table-cell-map-kmacro-keymap downcase-region ... set-goal-column delete-blank-lines mark-page toggle-read-only find-file-read-only save-buffer transpose-lines upcase-region find-alternate-file write-file exchange-point-and-mark nil iconify-or-deiconify-frame ... nil nil nil nil nil nil nil nil set-selective-display nil nil expand-abbrev kmacro-start-macro kmacro-end-macro calc-dispatch balance-windows nil shrink-window-if-larger-than-buffer set-fill-prefix point-to-register-compatibility-binding ...] nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil] nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil] nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil ...] (127 . 127) backward-kill-sentence)
  (lambda (key value) (aset elt key (table--replace-binding1 value)))((127 . 127) backward-kill-sentence)
  map-char-table((lambda (key value) (aset elt key (table--replace-binding1 value))) #^[nil nil keymap #^^[3 0 pop-global-mark nil list-buffers save-buffers-kill-emacs list-directory eval-last-sexp find-file nil nil indent-rigidly nil table-cell-map-kmacro-keymap downcase-region (keymap ... ... ... ... ... ... ... ... ... ... ...) set-goal-column delete-blank-lines mark-page toggle-read-only find-file-read-only save-buffer transpose-lines upcase-region find-alternate-file write-file exchange-point-and-mark nil iconify-or-deiconify-frame (keymap ... ...) nil nil nil nil nil nil nil nil set-selective-display nil nil expand-abbrev kmacro-start-macro kmacro-end-macro calc-dispatch balance-windows nil shrink-window-if-larger-than-buffer set-fill-prefix point-to-register-compatibility-binding ...] #^^[1 0 #^^[2 0 #^^[3 0 pop-global-mark nil list-buffers save-buffers-kill-emacs list-directory eval-last-sexp find-file nil nil indent-rigidly nil table-cell-map-kmacro-keymap downcase-region ... set-goal-column delete-blank-lines mark-page toggle-read-only find-file-read-only save-buffer transpose-lines upcase-region find-alternate-file write-file exchange-point-and-mark nil iconify-or-deiconify-frame ... nil nil nil nil nil nil nil nil set-selective-display nil nil expand-abbrev kmacro-start-macro kmacro-end-macro calc-dispatch balance-windows nil shrink-window-if-larger-than-buffer set-fill-prefix point-to-register-compatibility-binding ...] nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil] nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil] nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil ...])
  (cond ((char-table-p elt) (map-char-table ... elt)) ((vectorp elt) (let ... ...)) ((consp elt) (if ... ... ...)))
  (let ((elt ...) (otail tail)) (setq tail (cdr tail)) (cond (... ...) (... ...) (... ...)))
  (while (consp tail) (let (... ...) (setq tail ...) (cond ... ... ...)))
  (let ((tail keymap)) (while (consp tail) (let ... ... ...)))
  table--replace-binding((keymap #^[nil nil keymap #^^[3 0 pop-global-mark nil list-buffers save-buffers-kill-emacs list-directory eval-last-sexp find-file nil nil indent-rigidly nil table-cell-map-kmacro-keymap downcase-region ... set-goal-column delete-blank-lines mark-page toggle-read-only find-file-read-only save-buffer transpose-lines upcase-region find-alternate-file write-file exchange-point-and-mark nil iconify-or-deiconify-frame ... nil nil nil nil nil nil nil nil set-selective-display nil nil expand-abbrev kmacro-start-macro kmacro-end-macro calc-dispatch balance-windows nil shrink-window-if-larger-than-buffer set-fill-prefix point-to-register-compatibility-binding ...] #^^[1 0 #^^[2 0 #^^[3 0 pop-global-mark nil list-buffers save-buffers-kill-emacs list-directory eval-last-sexp find-file nil nil indent-rigidly nil table-cell-map-kmacro-keymap downcase-region ... set-goal-column delete-blank-lines mark-page toggle-read-only find-file-read-only save-buffer transpose-lines upcase-region find-alternate-file write-file exchange-point-and-mark nil iconify-or-deiconify-frame ... nil nil nil nil nil nil nil nil set-selective-display nil nil expand-abbrev kmacro-start-macro kmacro-end-macro calc-dispatch balance-windows nil shrink-window-if-larger-than-buffer set-fill-prefix point-to-register-compatibility-binding ...] nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil] nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil] nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil ...] (67108896 . pop-global-mark) (C-left . previous-buffer) (left . previous-buffer) (C-right . next-buffer) (right . next-buffer)))
  table--deep-copy-rebind-keymap((keymap #^[nil nil keymap #^^[3 0 pop-global-mark nil list-buffers save-buffers-kill-emacs list-directory eval-last-sexp find-file nil nil indent-rigidly nil kmacro-keymap downcase-region ... set-goal-column delete-blank-lines mark-page toggle-read-only find-file-read-only save-buffer transpose-lines upcase-region find-alternate-file write-file exchange-point-and-mark nil iconify-or-deiconify-frame ... nil nil nil nil nil nil nil nil set-selective-display nil nil expand-abbrev kmacro-start-macro kmacro-end-macro calc-dispatch balance-windows nil shrink-window-if-larger-than-buffer set-fill-prefix point-to-register-compatibility-binding ...] #^^[1 0 #^^[2 0 #^^[3 0 pop-global-mark nil list-buffers save-buffers-kill-emacs list-directory eval-last-sexp find-file nil nil indent-rigidly nil kmacro-keymap downcase-region ... set-goal-column delete-blank-lines mark-page toggle-read-only find-file-read-only save-buffer transpose-lines upcase-region find-alternate-file write-file exchange-point-and-mark nil iconify-or-deiconify-frame ... nil nil nil nil nil nil nil nil set-selective-display nil nil expand-abbrev kmacro-start-macro kmacro-end-macro calc-dispatch balance-windows nil shrink-window-if-larger-than-buffer set-fill-prefix point-to-register-compatibility-binding ...] nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil] nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil] nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil ...] (67108896 . pop-global-mark) (C-left . previous-buffer) (left . previous-buffer) (C-right . next-buffer) (right . next-buffer)))
  (fset symbol (table--deep-copy-rebind-keymap (symbol-function binding)))
  (let ((symbol ...) (func ...)) (setq table-cell-global-map-alist (cons ... table-cell-global-map-alist)) (if (eq ... ...) (load-library ...)) (fset symbol (table--deep-copy-rebind-keymap ...)) symbol)
  (or (cdr (assoc binding table-cell-global-map-alist)) (let (... ...) (setq table-cell-global-map-alist ...) (if ... ...) (fset symbol ...) symbol))
  (cond ((and ... ... ...) (or ... ...)) ((keymapp binding) (table--replace-binding binding)) ((stringp binding) (copy-sequence binding)) ((setq tmp ...) (cdr tmp)) (t binding))
  (let (tmp) (cond (... ...) (... ...) (... ...) (... ...) (t binding)))
  table--replace-binding1(Control-X-prefix)
  (aset elt key (table--replace-binding1 value))
  (lambda (key value) (aset elt key (table--replace-binding1 value)))(24 Control-X-prefix)
  map-char-table((lambda (key value) (aset elt key (table--replace-binding1 value))) #^[nil nil keymap #^^[3 0 set-mark-command move-beginning-of-line backward-char table-cell-map-mode-specific-command-prefix *table--cell-delete-char move-end-of-line forward-char keyboard-quit table-cell-map-help-command indent-for-tab-command *table--cell-newline-and-indent kill-line recenter *table--cell-newline next-line *table--cell-open-line previous-line *table--cell-quoted-insert isearch-backward isearch-forward transpose-chars universal-argument scroll-up kill-region Control-X-prefix yank ctl-z-map ESC-prefix toggle-input-method abort-recursive-edit nil undo self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command ...] #^^[1 0 #^^[2 0 #^^[3 0 set-mark-command move-beginning-of-line backward-char table-cell-map-mode-specific-command-prefix *table--cell-delete-char move-end-of-line forward-char keyboard-quit table-cell-map-help-command indent-for-tab-command *table--cell-newline-and-indent kill-line recenter *table--cell-newline next-line *table--cell-open-line previous-line *table--cell-quoted-insert isearch-backward isearch-forward transpose-chars universal-argument scroll-up kill-region Control-X-prefix yank ctl-z-map ESC-prefix toggle-input-method abort-recursive-edit nil undo self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command ...] self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command] self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command] self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command ...])
  (cond ((char-table-p elt) (map-char-table ... elt)) ((vectorp elt) (let ... ...)) ((consp elt) (if ... ... ...)))
  (let ((elt ...) (otail tail)) (setq tail (cdr tail)) (cond (... ...) (... ...) (... ...)))
  (while (consp tail) (let (... ...) (setq tail ...) (cond ... ... ...)))
  (let ((tail keymap)) (while (consp tail) (let ... ... ...)))
  table--replace-binding((keymap #^[nil nil keymap #^^[3 0 set-mark-command move-beginning-of-line backward-char table-cell-map-mode-specific-command-prefix *table--cell-delete-char move-end-of-line forward-char keyboard-quit table-cell-map-help-command indent-for-tab-command *table--cell-newline-and-indent kill-line recenter *table--cell-newline next-line *table--cell-open-line previous-line *table--cell-quoted-insert isearch-backward isearch-forward transpose-chars universal-argument scroll-up kill-region Control-X-prefix yank ctl-z-map ESC-prefix toggle-input-method abort-recursive-edit nil undo self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command ...] #^^[1 0 #^^[2 0 #^^[3 0 set-mark-command move-beginning-of-line backward-char table-cell-map-mode-specific-command-prefix *table--cell-delete-char move-end-of-line forward-char keyboard-quit table-cell-map-help-command indent-for-tab-command *table--cell-newline-and-indent kill-line recenter *table--cell-newline next-line *table--cell-open-line previous-line *table--cell-quoted-insert isearch-backward isearch-forward transpose-chars universal-argument scroll-up kill-region Control-X-prefix yank ctl-z-map ESC-prefix toggle-input-method abort-recursive-edit nil undo self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command ...] self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command] self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command] self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command ...] (quail-advice . quail-advice) (33554464 . set-mark-command) (F1 lambda nil (interactive) (manual-entry ...)) (S-mouse-3 . kmacro-end-call-mouse) (C-M-backspace) (C-M-delete) (M-backspace) (M-delete) (drag-n-drop . x-dnd-handle-drag-n-drop-event) (paste . clipboard-yank) (copy . clipboard-kill-ring-save) (cut . clipboard-kill-region) (f18 . clipboard-yank) (f16 . clipboard-kill-ring-save) (f20 . clipboard-kill-region) (C-mouse-4 . mwheel-scroll) (S-mouse-4 . mwheel-scroll) (mouse-4 . mwheel-scroll) (C-mouse-5 . mwheel-scroll) (S-mouse-5 . mwheel-scroll) (mouse-5 . mwheel-scroll) (tool-bar menu-item "tool bar" ignore :filter (lambda ... tool-bar-map)) (vertical-line keymap (mouse-1 . mouse-select-window) (down-mouse-1 . mouse-drag-vertical-line) (C-mouse-2 . mouse-split-window-vertically)) (vertical-scroll-bar keymap (mouse-1 . scroll-bar-toolkit-scroll) (C-mouse-2 . mouse-split-window-vertically)) (header-line keymap (mouse-1 . mouse-select-window) (down-mouse-1 . mouse-drag-header-line)) (mode-line keymap (C-mouse-2 . mouse-split-window-horizontally) (mouse-3 . mouse-delete-window) (mouse-2 . mouse-delete-other-windows) (down-mouse-1 . mouse-drag-mode-line) (drag-mouse-1 . mouse-select-window) (mouse-1 . mouse-select-window)) (C-down-mouse-3 . mouse-popup-menubar-stuff) (S-down-mouse-1 . mouse-set-font) (C-down-mouse-1 . mouse-buffer-menu) (mouse-3 . mouse-save-then-kill) (mouse-2 . mouse-yank-at-click) (right-fringe keymap (mouse-1 . mouse-set-point)) (left-fringe keymap (mouse-1 . mouse-set-point)) (triple-mouse-1 . mouse-set-point) (double-mouse-1 . mouse-set-point) (drag-mouse-1 . mouse-set-region) (mouse-1 . mouse-set-point) (down-mouse-1 . mouse-drag-region) (M-mouse-2 . mouse-yank-secondary) (M-mouse-3 . mouse-secondary-save-then-kill) (M-down-mouse-1 . mouse-drag-secondary) (M-drag-mouse-1 . mouse-set-secondary) (M-mouse-1 . mouse-start-secondary) (C-down-mouse-2 . facemenu-menu) (compose-last-chars . compose-last-chars) (f1 . help-command) (help . help-command) (f2 . 2C-command) ...))
  table--deep-copy-rebind-keymap((keymap #^[nil nil keymap #^^[3 0 set-mark-command move-beginning-of-line backward-char mode-specific-command-prefix delete-char move-end-of-line forward-char keyboard-quit help-command indent-for-tab-command newline-and-indent kill-line recenter newline next-line open-line previous-line quoted-insert isearch-backward isearch-forward transpose-chars universal-argument scroll-up kill-region Control-X-prefix yank ctl-z-map ESC-prefix toggle-input-method abort-recursive-edit nil undo self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command ...] #^^[1 0 #^^[2 0 #^^[3 0 set-mark-command move-beginning-of-line backward-char mode-specific-command-prefix delete-char move-end-of-line forward-char keyboard-quit help-command indent-for-tab-command newline-and-indent kill-line recenter newline next-line open-line previous-line quoted-insert isearch-backward isearch-forward transpose-chars universal-argument scroll-up kill-region Control-X-prefix yank ctl-z-map ESC-prefix toggle-input-method abort-recursive-edit nil undo self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command ...] self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command] self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command] self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command self-insert-command ...] (quail-advice . quail-advice) (33554464 . set-mark-command) (F1 lambda nil (interactive) (manual-entry ...)) (S-mouse-3 . kmacro-end-call-mouse) (C-M-backspace) (C-M-delete) (M-backspace) (M-delete) (drag-n-drop . x-dnd-handle-drag-n-drop-event) (paste . clipboard-yank) (copy . clipboard-kill-ring-save) (cut . clipboard-kill-region) (f18 . clipboard-yank) (f16 . clipboard-kill-ring-save) (f20 . clipboard-kill-region) (C-mouse-4 . mwheel-scroll) (S-mouse-4 . mwheel-scroll) (mouse-4 . mwheel-scroll) (C-mouse-5 . mwheel-scroll) (S-mouse-5 . mwheel-scroll) (mouse-5 . mwheel-scroll) (tool-bar menu-item "tool bar" ignore :filter (lambda ... tool-bar-map)) (vertical-line keymap (mouse-1 . mouse-select-window) (down-mouse-1 . mouse-drag-vertical-line) (C-mouse-2 . mouse-split-window-vertically)) (vertical-scroll-bar keymap (mouse-1 . scroll-bar-toolkit-scroll) (C-mouse-2 . mouse-split-window-vertically)) (header-line keymap (mouse-1 . mouse-select-window) (down-mouse-1 . mouse-drag-header-line)) (mode-line keymap (C-mouse-2 . mouse-split-window-horizontally) (mouse-3 . mouse-delete-window) (mouse-2 . mouse-delete-other-windows) (down-mouse-1 . mouse-drag-mode-line) (drag-mouse-1 . mouse-select-window) (mouse-1 . mouse-select-window)) (C-down-mouse-3 . mouse-popup-menubar-stuff) (S-down-mouse-1 . mouse-set-font) (C-down-mouse-1 . mouse-buffer-menu) (mouse-3 . mouse-save-then-kill) (mouse-2 . mouse-yank-at-click) (right-fringe keymap (mouse-1 . mouse-set-point)) (left-fringe keymap (mouse-1 . mouse-set-point)) (triple-mouse-1 . mouse-set-point) (double-mouse-1 . mouse-set-point) (drag-mouse-1 . mouse-set-region) (mouse-1 . mouse-set-point) (down-mouse-1 . mouse-drag-region) (M-mouse-2 . mouse-yank-secondary) (M-mouse-3 . mouse-secondary-save-then-kill) (M-down-mouse-1 . mouse-drag-secondary) (M-drag-mouse-1 . mouse-set-secondary) (M-mouse-1 . mouse-start-secondary) (C-down-mouse-2 . facemenu-menu) (compose-last-chars . compose-last-chars) (f1 . help-command) (help . help-command) (f2 . 2C-command) ...))
  (setq table-cell-global-map (table--deep-copy-rebind-keymap (current-global-map)))
  (let ((map ...) table-cell-global-map) (if (vectorp table-command-prefix) (mapcar ... table-cell-bindings)) (mapcar (lambda ... ...) table-cell-bindings) (setq table-cell-global-map (table--deep-copy-rebind-keymap ...)) (if (featurep ...) (mapcar ... table-command-replacement-alist)) (set-keymap-parent map table-cell-global-map) (setq table-cell-map map) (fset (quote table-cell-map) map))
  (if table-cell-map nil (let (... table-cell-global-map) (if ... ...) (mapcar ... table-cell-bindings) (setq table-cell-global-map ...) (if ... ...) (set-keymap-parent map table-cell-global-map) (setq table-cell-map map) (fset ... map)))
  (unless table-cell-map (let (... table-cell-global-map) (if ... ...) (mapcar ... table-cell-bindings) (setq table-cell-global-map ...) (if ... ...) (set-keymap-parent map table-cell-global-map) (setq table-cell-map map) (fset ... map)))
  (let ((table-inhibit-advice t)) (unless table-cell-map (let ... ... ... ... ... ... ... ...)) (unless table-disable-menu (easy-menu-define table-cell-menu-map table-cell-map "Table cell menu" table-cell-menu) (if ... ...)) (run-hooks (quote table-cell-map-hook)))
  table--make-cell-map()
  (let ((table-inhibit-advice t)) (table--make-cell-map) (if (null cell-width) (setq cell-width ...)) (if (null cell-height) (setq cell-height ...)) (if (stringp columns) (setq columns ...)) (if (stringp rows) (setq rows ...)) (if (stringp cell-width) (setq cell-width ...)) (if (stringp cell-height) (setq cell-height ...)) (if (numberp cell-width) (setq cell-width ...)) (if (numberp cell-height) (setq cell-height ...)) (mapcar (lambda ... ...) (quote ...)) (let (... ... r i cw ch cell-str border-str) (with-temp-buffer ... ... ... ... ... ... ... ... ... ... ...) (save-excursion ... ...) (setq r 0) (setq ch cell-height) (while ... ... ... ... ... ... ... ... ... ...) (table--goto-coordinate ...) (table-recognize-cell ...)))
  table-insert("3" "3" "5" "1")
  call-interactively(table-insert)
  execute-extended-command(nil)
  call-interactively(execute-extended-command)

2006/5/1, Peter Dyballa <Peter_Dyballa@web.de>:

Am 01.05.2006 um 01:55 schrieb Guo Wei-Wei:

> I'm a newbie for emacs. I'm using emacs cvs (emacs 23 in gentoo,
> maybe it's emacs-unicode-2)

GNU Emacs 23.0.0 (as also GNU Emacs 22.0.50) works very well in a
Latin based environment when the environment variable LC_CTYPE is set
to something like de_DE.UTF-8. I don't need to set then:

        (set-default-coding-systems     'utf-8)
        (set-file-name-coding-system    'utf-8)
        (prefer-coding-system           'utf-8)

set-language-environment should be avoided.

Have you tried to launch GNU Emacs 23.0.0 -q or -Q? Could be the
cause for the errors you see is caused by your .emacs file. The
switches -q and -Q avoid loading it and other site specific files.

--
Greetings

   Pete                           <]
              o        __o         |__    o       HPV, the real
     ___o    /I       -\<,         |o \  -\),-%     high speed!
___/\ /\___./ \___...O/ O____.....`-O-'-()--o_________________