.emacs-my
changeset 994 4bc77d7283ea
parent 993 0a4851d1f516
child 995 9d2f14f723c4
equal deleted inserted replaced
993:0a4851d1f516 994:4bc77d7283ea
  2083 
  2083 
  2084 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  2084 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  2085 (message "imenu")
  2085 (message "imenu")
  2086 
  2086 
  2087 (defun my-imenu-to-menubar ()
  2087 (defun my-imenu-to-menubar ()
  2088   (imenu-add-menubar-index)
  2088   (when (and (current-local-map)
  2089   (run-hooks 'menu-bar-update-hook)
  2089              (keymapp (lookup-key (current-local-map) [menu-bar index])))
  2090   )
  2090     (imenu-add-menubar-index)
       
  2091     (run-hooks 'menu-bar-update-hook) ))
  2091 
  2092 
  2092 (require 'imenu)
  2093 (require 'imenu)
  2093 (mapc (lambda (hook) (add-hook hook 'my-imenu-to-menubar))
  2094 (mapc (lambda (hook) (add-hook hook 'my-imenu-to-menubar))
  2094       my-devel-mode-hook-list)
  2095       my-devel-mode-hook-list)
  2095 
  2096 
  2417 
  2418 
  2418 (setq nxml-sexp-element-flag t)
  2419 (setq nxml-sexp-element-flag t)
  2419 (setq nxml-child-indent 2)
  2420 (setq nxml-child-indent 2)
  2420 (setq nxml-attribute-indent 4)
  2421 (setq nxml-attribute-indent 4)
  2421 
  2422 
  2422 (eval-after-load 'rng-loc
  2423 (eval-after-load 'nxml-mode '(define-key nxml-mode-map [C-return] 'nxml-complete))
  2423   '(progn
  2424 
  2424      (add-to-list 'rng-schema-locating-files "~/.emacs.d/rnc/schemas.xml")
  2425 (eval-after-load 'rng-loc '(add-to-list 'rng-schema-locating-files "~/.emacs.d/rnc/schemas.xml"))
  2425      (define-key nxml-mode-map [C-return] 'nxml-complete)
       
  2426      ))
       
  2427 
  2426 
  2428 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  2427 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  2429 (message "psgml")
  2428 (message "psgml")
  2430 
  2429 
  2431 (setq my-html-template
  2430 (setq my-html-template