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

["Guo Wei-Wei" <wwguocn@gmail.com>]

[-- Attachment #1.1: Type: text/plain, Size: 28573 bytes --]

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_________________
>
>
>
>

[-- Attachment #1.2: Type: text/html, Size: 29666 bytes --]

[-- Attachment #2: Type: text/plain, Size: 152 bytes --]

_______________________________________________
help-gnu-emacs mailing list
help-gnu-emacs@gnu.org
http://lists.gnu.org/mailman/listinfo/help-gnu-emacs