Variable: cperl-mode-map

cperl-mode-map is a variable defined in cperl-mode.el.gz.

Value

           cperl-indent-exp
           cperl-indent-for-comment
(          cperl-electric-paren
)          cperl-electric-rparen
:          cperl-electric-terminator
;          cperl-electric-semi
<          cperl-electric-paren
C-M-\      cperl-indent-region
C-M-q      cperl-indent-exp
C-M-|      cperl-lineup
C-c C-a    cperl-toggle-auto-newline
C-c C-b    cperl-find-bad-style
C-c C-d    cperl-here-doc-spell
C-c C-e    cperl-toggle-electric
C-c C-f    auto-fill-mode
C-c C-h F  cperl-perldoc
C-c C-h P  cperl-perldoc-at-point
C-c C-h a  cperl-toggle-autohelp
C-c C-h f  cperl-perldoc
C-c C-h p  cperl-perldoc
C-c C-h v  cperl-get-help
C-c C-j    cperl-linefeed
C-c C-k    cperl-toggle-abbrev
C-c C-n    cperl-narrow-to-here-doc
C-c C-p    cperl-pod-spell
C-c C-t    cperl-invert-if-unless
C-c C-v    cperl-next-interpolated-REx
C-c C-w    cperl-toggle-construct-fix
C-c C-x    cperl-next-interpolated-REx-0
C-c C-y    cperl-next-interpolated-REx-1
DEL        cperl-electric-backspace
TAB        cperl-indent-command
[          cperl-electric-paren
]          cperl-electric-rparen
{          cperl-electric-lbrace
}          cperl-electric-brace

Documentation

Keymap used in CPerl mode.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/cperl-mode.el.gz
(defvar cperl-mode-map
  (let ((map (make-sparse-keymap)))
    (define-key map "{" 'cperl-electric-lbrace)
    (define-key map "[" 'cperl-electric-paren)
    (define-key map "(" 'cperl-electric-paren)
    (define-key map "<" 'cperl-electric-paren)
    (define-key map "}" 'cperl-electric-brace)
    (define-key map "]" 'cperl-electric-rparen)
    (define-key map ")" 'cperl-electric-rparen)
    (define-key map ";" 'cperl-electric-semi)
    (define-key map ":" 'cperl-electric-terminator)
    (define-key map "\C-c\C-j" 'cperl-linefeed)
    (define-key map "\C-c\C-t" 'cperl-invert-if-unless)
    (define-key map "\C-c\C-a" 'cperl-toggle-auto-newline)
    (define-key map "\C-c\C-k" 'cperl-toggle-abbrev)
    (define-key map "\C-c\C-w" 'cperl-toggle-construct-fix)
    (define-key map "\C-c\C-f" 'auto-fill-mode)
    (define-key map "\C-c\C-e" 'cperl-toggle-electric)
    (define-key map "\C-c\C-b" 'cperl-find-bad-style)
    (define-key map "\C-c\C-p" 'cperl-pod-spell)
    (define-key map "\C-c\C-d" 'cperl-here-doc-spell)
    (define-key map "\C-c\C-n" 'cperl-narrow-to-here-doc)
    (define-key map "\C-c\C-v" 'cperl-next-interpolated-REx)
    (define-key map "\C-c\C-x" 'cperl-next-interpolated-REx-0)
    (define-key map "\C-c\C-y" 'cperl-next-interpolated-REx-1)
    (define-key map "\C-c\C-ha" 'cperl-toggle-autohelp)
    (define-key map "\C-c\C-hp" 'cperl-perldoc)
    (define-key map "\C-c\C-hP" 'cperl-perldoc-at-point)
    (define-key map "\e\C-q" 'cperl-indent-exp) ; Usually not bound
    (define-key map [(control meta ?|)] 'cperl-lineup)
    ;;(define-key map "\M-q" 'cperl-fill-paragraph)
    ;;(define-key map "\e;" 'cperl-indent-for-comment)
    (define-key map "\177" 'cperl-electric-backspace)
    (define-key map "\t" 'cperl-indent-command)
    ;; don't clobber the backspace binding:
    (define-key map [(control ?c) (control ?h) ?F] 'cperl-perldoc)
    (if (cperl-val 'cperl-clobber-lisp-bindings)
        (progn
	  (define-key map [(control ?h) ?f]
	    ;;(concat (char-to-string help-char) "f") ; does not work
	    'cperl-perldoc)
	  (define-key map [(control ?h) ?v]
	    ;;(concat (char-to-string help-char) "v") ; does not work
	    'cperl-get-help)
	  (define-key map [(control ?c) (control ?h) ?f]
	    ;;(concat (char-to-string help-char) "f") ; does not work
	    (key-binding "\C-hf"))
	  (define-key map [(control ?c) (control ?h) ?v]
	    ;;(concat (char-to-string help-char) "v") ; does not work
	    (key-binding "\C-hv")))
      (define-key map [(control ?c) (control ?h) ?f]
        'cperl-perldoc)
      (define-key map [(control ?c) (control ?h) ?v]
	;;(concat (char-to-string help-char) "v") ; does not work
	'cperl-get-help))
    (define-key map [remap indent-sexp]        #'cperl-indent-exp)
    (define-key map [remap indent-region]      #'cperl-indent-region)
    (define-key map [remap indent-for-comment] #'cperl-indent-for-comment)
    map)
  "Keymap used in CPerl mode.")