Lines Matching +defs:calendar +defs:mode
238 (defgroup calendar nil
377 (defgroup abbrev-mode nil
378 "Word abbreviations mode."
392 (defgroup mode-line nil
469 ;;; Custom mode keymaps
471 (defvar custom-mode-map
488 "Keymap for `custom-mode'.")
490 (defvar custom-mode-link-map
492 (set-keymap-parent map custom-mode-map)
497 "Local keymap for links in `custom-mode'.")
1005 (defun customize-mode (mode)
1006 "Customize options related to the current major mode.
1007 If a prefix \\[universal-argument] was given (or if the current major mode has no known group),
1011 (let ((completion-regexp-list '("-mode\\'"))
1012 (group (custom-group-of-mode major-mode)))
1014 major-mode
1017 (format "Major mode (default %s): " major-mode)
1018 "Major mode: ")
1020 'custom-group-of-mode
1021 t nil nil (if group (symbol-name major-mode))))))))
1022 (customize-group (custom-group-of-mode mode)))
1548 (custom-mode)
1692 (custom-mode)
1816 :keymap custom-mode-link-map
2571 ;; In lisp mode edit the saved value when possible.
2599 ;; Edit mode.
3710 :keymap custom-mode-link-map
4193 (if recentf-mode
4202 (unless (eq major-mode 'emacs-lisp-mode)
4203 (emacs-lisp-mode))
4509 (easy-menu-define Custom-mode-menu
4510 custom-mode-map
4541 (defcustom custom-mode-hook nil
4542 "Hook called when entering Custom mode."
4550 (defun custom-mode ()
4551 "Major mode for editing customization buffers.
4560 \\<custom-mode-map>\
4570 Entry to this mode calls the value of `custom-mode-hook'
4573 (setq major-mode 'custom-mode
4574 mode-name "Custom")
4575 (use-local-map custom-mode-map)
4576 (easy-menu-add Custom-mode-menu)
4601 (run-mode-hooks 'custom-mode-hook))
4603 (put 'custom-mode 'mode-class 'special)