[Python-mode] xemacs Potential problem

Eric S. Johansson esj at harvee.org
Fri Aug 19 09:18:52 CEST 2011


On 8/9/2011 1:35 AM, Andreas Röhler wrote:
>
> For the moment put a semicolon before
>
> (require 'highlight-indentation)
>
> in python-mode.el, that's all.

;; (when (featurep 'xemacs)
;;  (require 'highlight-indentation))

yields

(1) (file-mode-spec/warning) Error in File mode specification: menu keyword must 
be :config, :included, :accelerator or :filter: :help

Backtrace follows:

   backtrace(nil t)
   # bind (standard-output standard-output handler-arg-name)
   
backtrace-in-condition-handler-eliminating-handler(call-trapping-errors-Ldc9FC5Hr)
   # bind (errstr call-trapping-errors-Ldc9FC5Hr)
   #<compiled-function (from "/home/esj/xemacs-beta/lisp/files.elc") 
(call-trapping-errors-Ldc9FC5Hr) "...(17)" [call-trapping-errors-Ldc9FC5Hr 
errstr error-message-string lwarn file-mode-spec warning "Error in %s: 
%s\n\nBacktrace follows:\n\n%s" "File mode specification" 
backtrace-in-condition-handler-eliminating-handler] 8 0x694>((error "menu 
keyword must be :config, :included, :accelerator or :filter" :help))
   signal(error ("menu keyword must be :config, :included, :accelerator or 
:filter" :help))
   # bind (menuitem item menubar-p menu)
   check-menu-syntax(("Python" :help "Python-specific Features" ["Shift region 
left" py-shift-left :active mark-active :help "Shift by a single indentation 
step"] ["Shift region right" py-shift-right :active mark-active :help "Shift by 
a single indentation step"] "-" ["Mark block" py-mark-block :help "Mark 
innermost block at point"] ["Mark def/class" mark-defun :help "Mark innermost 
definition at point"] "-" ["Start of block" py-beginning-of-block :help "Go to 
start of innermost definition at point"] ["End of block" py-end-of-block :help 
"Go to end of innermost definition at point"] ["Start of def/class" 
beginning-of-defun :help "Go to start of innermost definition at point"] ["End 
of def/class" end-of-defun :help "Go to end of innermost definition at point"] 
"-" ("Templates..." :help "Expand templates for compound statements" :filter 
(lambda (&rest junk) (abbrev-table-menu python-mode-abbrev-table))) "-" 
["Import/reload file" py-execute-import-or-reload :help "Load into inferior 
Python session"] ["Eval buffer" py-execute-buffer :help "Evaluate buffer en bloc 
in inferior Python session"] ["Eval region" py-execute-region :active 
mark-active :help "Evaluate region en bloc in inferior Python session"] ["Eval 
def/class" py-execute-defun :help "Evaluate current definition in inferior 
Python session"] ["Switch to interpreter" py-shell :help "Switch to `inferior' 
Python in separate buffer"] ["Set default process" py-set-proc :help "Make 
buffer's inferior process the default" :active (buffer-live-p py-buffer)] 
["Check file" py-check :help "Run pychecker"] ["Debugger" pdb :help "Run pdb 
under GUD"] "-" ["Help on symbol" py-describe-symbol :help "Use pydoc on symbol 
at point"] ["Complete symbol" completion-at-point :help "Complete (qualified) 
symbol before point"] ["Find function" py-find-function :help "Try to find 
source definition of function at point"] ["Update imports" py-find-imports :help 
"Update list of top-level imports for completion"]) nil)
   # bind (in-menu before submenu menu-path)
   add-submenu(nil ("Python" :help "Python-specific Features" ["Shift region 
left" py-shift-left :active mark-active :help "Shift by a single indentation 
step"] ["Shift region right" py-shift-right :active mark-active :help "Shift by 
a single indentation step"] "-" ["Mark block" py-mark-block :help "Mark 
innermost block at point"] ["Mark def/class" mark-defun :help "Mark innermost 
definition at point"] "-" ["Start of block" py-beginning-of-block :help "Go to 
start of innermost definition at point"] ["End of block" py-end-of-block :help 
"Go to end of innermost definition at point"] ["Start of def/class" 
beginning-of-defun :help "Go to start of innermost definition at point"] ["End 
of def/class" end-of-defun :help "Go to end of innermost definition at point"] 
"-" ("Templates..." :help "Expand templates for compound statements" :filter 
(lambda (&rest junk) (abbrev-table-menu python-mode-abbrev-table))) "-" 
["Import/reload file" py-execute-import-or-reload :help "Load into inferior 
Python session"] ["Eval buffer" py-execute-buffer :help "Evaluate buffer en bloc 
in inferior Python session"] ["Eval region" py-execute-region :active 
mark-active :help "Evaluate region en bloc in inferior Python session"] ["Eval 
def/class" py-execute-defun :help "Evaluate current definition in inferior 
Python session"] ["Switch to interpreter" py-shell :help "Switch to `inferior' 
Python in separate buffer"] ["Set default process" py-set-proc :help "Make 
buffer's inferior process the default" :active (buffer-live-p py-buffer)] 
["Check file" py-check :help "Run pychecker"] ["Debugger" pdb :help "Run pdb 
under GUD"] "-" ["Help on symbol" py-describe-symbol :help "Use pydoc on symbol 
at point"] ["Complete symbol" completion-at-point :help "Complete (qualified) 
symbol before point"] ["Find function" py-find-function :help "Try to find 
source definition of function at point"] ["Update imports" py-find-imports :help 
"Update list of top-level imports for completion"]) nil)
   # bind (before menu-items menu-name menu-path)
   add-menu(nil "Python" (:help "Python-specific Features" ["Shift region left" 
py-shift-left :active mark-active :help "Shift by a single indentation step"] 
["Shift region right" py-shift-right :active mark-active :help "Shift by a 
single indentation step"] "-" ["Mark block" py-mark-block :help "Mark innermost 
block at point"] ["Mark def/class" mark-defun :help "Mark innermost definition 
at point"] "-" ["Start of block" py-beginning-of-block :help "Go to start of 
innermost definition at point"] ["End of block" py-end-of-block :help "Go to end 
of innermost definition at point"] ["Start of def/class" beginning-of-defun 
:help "Go to start of innermost definition at point"] ["End of def/class" 
end-of-defun :help "Go to end of innermost definition at point"] "-" 
("Templates..." :help "Expand templates for compound statements" :filter (lambda 
(&rest junk) (abbrev-table-menu python-mode-abbrev-table))) "-" ["Import/reload 
file" py-execute-import-or-reload :help "Load into inferior Python session"] 
["Eval buffer" py-execute-buffer :help "Evaluate buffer en bloc in inferior 
Python session"] ["Eval region" py-execute-region :active mark-active :help 
"Evaluate region en bloc in inferior Python session"] ["Eval def/class" 
py-execute-defun :help "Evaluate current definition in inferior Python session"] 
["Switch to interpreter" py-shell :help "Switch to `inferior' Python in separate 
buffer"] ["Set default process" py-set-proc :help "Make buffer's inferior 
process the default" :active (buffer-live-p py-buffer)] ["Check file" py-check 
:help "Run pychecker"] ["Debugger" pdb :help "Run pdb under GUD"] "-" ["Help on 
symbol" py-describe-symbol :help "Use pydoc on symbol at point"] ["Complete 
symbol" completion-at-point :help "Complete (qualified) symbol before point"] 
["Find function" py-find-function :help "Try to find source definition of 
function at point"] ["Update imports" py-find-imports :help "Update list of 
top-level imports for completion"]))
   # bind (map menu)
   easy-menu-add(("Python" :help "Python-specific Features" ["Shift region left" 
py-shift-left :active mark-active :help "Shift by a single indentation step"] 
["Shift region right" py-shift-right :active mark-active :help "Shift by a 
single indentation step"] "-" ["Mark block" py-mark-block :help "Mark innermost 
block at point"] ["Mark def/class" mark-defun :help "Mark innermost definition 
at point"] "-" ["Start of block" py-beginning-of-block :help "Go to start of 
innermost definition at point"] ["End of block" py-end-of-block :help "Go to end 
of innermost definition at point"] ["Start of def/class" beginning-of-defun 
:help "Go to start of innermost definition at point"] ["End of def/class" 
end-of-defun :help "Go to end of innermost definition at point"] "-" 
("Templates..." :help "Expand templates for compound statements" :filter (lambda 
(&rest junk) (abbrev-table-menu python-mode-abbrev-table))) "-" ["Import/reload 
file" py-execute-import-or-reload :help "Load into inferior Python session"] 
["Eval buffer" py-execute-buffer :help "Evaluate buffer en bloc in inferior 
Python session"] ["Eval region" py-execute-region :active mark-active :help 
"Evaluate region en bloc in inferior Python session"] ["Eval def/class" 
py-execute-defun :help "Evaluate current definition in inferior Python session"] 
["Switch to interpreter" py-shell :help "Switch to `inferior' Python in separate 
buffer"] ["Set default process" py-set-proc :help "Make buffer's inferior 
process the default" :active (buffer-live-p py-buffer)] ["Check file" py-check 
:help "Run pychecker"] ["Debugger" pdb :help "Run pdb under GUD"] "-" ["Help on 
symbol" py-describe-symbol :help "Use pydoc on symbol at point"] ["Complete 
symbol" completion-at-point :help "Complete (qualified) symbol before point"] 
["Find function" py-find-function :help "Try to find source definition of 
function at point"] ["Update imports" py-find-imports :help "Update list of 
top-level imports for completion"]))
   (if py-menu (easy-menu-add py-menu))
   python-mode()
   # bind (alist mode name keep-going)
   # (unwind-protect ...)
   # bind (just-from-file-name)
   set-auto-mode()
   #<compiled-function (from "/home/esj/xemacs-beta/lisp/files.elc") nil 
"...(5)" [set-auto-mode t] 1 0x695>()
   # (unwind-protect ...)
   call-with-condition-handler(#<compiled-function (from 
"/home/esj/xemacs-beta/lisp/files.elc") (call-trapping-errors-Ldc9FC5Hr) 
"...(17)" [call-trapping-errors-Ldc9FC5Hr errstr error-message-string lwarn 
file-mode-spec warning "Error in %s: %s\n\nBacktrace follows:\n\n%s" "File mode 
specification" backtrace-in-condition-handler-eliminating-handler] 8 0x694> 
#<compiled-function (from "/home/esj/xemacs-beta/lisp/files.elc") nil "...(5)" 
[set-auto-mode t] 1 0x695>)
   # (condition-case ... . ((error)))
   # bind (find-file)
   normal-mode(t)
   # bind (nomodes after-find-file-from-revert-buffer noauto warn error)
   after-find-file(nil t)
   # (unwind-protect ...)
   # bind (inhibit-read-only error number truename rawfile nowarn filename buf)
   find-file-noselect-1(#<buffer "food_calc.py"> "/home/esj/food/food_calc.py" 
nil nil "c:/cygwin/home/esj/food/food_calc.py" (361450 -22488999))
   byte-code("..." [number truename rawfile nowarn filename buf 
set-buffer-major-mode find-file-noselect-1] 7)
   # (condition-case ... . ((t (byte-code "Â!ˆÃ    @    A\"‡" [buf data 
kill-buffer signal] 3))))
   # bind (number truename buf wildcards rawfile nowarn filename)
   find-file-noselect("/home/esj/food/food_calc.py" nil nil nil)
   # bind (coding-system-for-read wildcards codesys filename)
   find-file("/home/esj/food/food_calc.py")
   # bind (dir file-count line end-of-options file-p arg tem)
   command-line-1()
   # bind (command-line-args-left)
   command-line()
   # (condition-case ... . ((t (byte-code "    ‡" [error-data data nil] 1))))
   # bind (error-data)
   normal-top-level()
   # (condition-case ... . error)
   # (catch top-level ...)



More information about the Python-mode mailing list