elisp-minor-mode.el

;;; elisp-minor-mode.el --- Write Minor Mode

;;; Commentary:
;;
;; See Info node `(elisp) Minor Mode'

;;; `foo-mode' variable and functions, `foo-mode-hook' are define via this macro.
(define-minor-mode foo-mode
  "Foo minor mode."
  ;; The initial value.
  nil
  ;; The indicator for the mode line.
  " Foo"
  ;; The minor mode bindings.
  '(([f7] . foo-A)
    ("\C-x\M-l" .                       ; C-x M-l
     (lambda () (interactive) (message "Hitted C-x M-l")))
    ([?\C-=] . 'emacs-version)          ; C-=
    ("\C-x\ t" . 'emacs-uptime)         ; C-x t
    ("\C-x\t" . 'emacs-init-time)       ; C-x <TAB>
    )
  :group 'foo
  :global nil
  :after-hook nil)