cperl-menu
cperl-menu is a variable defined in `
cperl-mode.el'.
Its value is shown
below.
Documentation:
Menu for CPerl mode
Value:
(keymap "Perl"
(Beginning\ of\ function menu-item "Beginning of function" beginning-of-defun)
(End\ of\ function menu-item "End of function" end-of-defun)
(Mark\ function menu-item "Mark function" mark-defun)
(Indent\ expression menu-item "Indent expression" cperl-indent-exp)
(Fill\ paragraph/comment menu-item "Fill paragraph/comment" fill-paragraph)
(nil menu-item "----")
(Line\ up\ a\ construction menu-item "Line up a construction" cperl-lineup :enable
(cperl-use-region-p))
(Invert\ if/unless/while\ etc menu-item "Invert if/unless/while etc" cperl-invert-if-unless)
(Regexp menu-item "Regexp"
(keymap "Regexp"
(Beautify menu-item "Beautify" cperl-beautify-regexp :enable cperl-use-syntax-table-text-property)
(Beautify\ one\ level\ deep menu-item "Beautify one level deep" menu-function-296 :key-sequence nil :enable cperl-use-syntax-table-text-property)
(Beautify\ a\ group menu-item "Beautify a group" cperl-beautify-level :enable cperl-use-syntax-table-text-property)
(Beautify\ a\ group\ one\ level\ deep menu-item "Beautify a group one level deep" menu-function-297 :key-sequence nil :enable cperl-use-syntax-table-text-property)
(Contract\ a\ group menu-item "Contract a group" cperl-contract-level :enable cperl-use-syntax-table-text-property)
(Contract\ groups menu-item "Contract groups" cperl-contract-levels :enable cperl-use-syntax-table-text-property)
(nil menu-item "----")
(Find\ next\ interpolated menu-item "Find next interpolated" cperl-next-interpolated-REx :enable
(next-single-property-change
(point-min)
'REx-interpolated))
(Find\ next\ interpolated\ \(no\ //o\) menu-item "Find next interpolated (no //o)" cperl-next-interpolated-REx-0 :enable
(or
(text-property-any
(point-min)
(point-max)
'REx-interpolated t)
(text-property-any
(point-min)
(point-max)
'REx-interpolated 1)))
(Find\ next\ interpolated\ \(neither\ //o\ nor\ whole-REx\) menu-item "Find next interpolated (neither //o nor whole-REx)" cperl-next-interpolated-REx-1 :enable
(text-property-any
(point-min)
(point-max)
'REx-interpolated t))))
(Insert\ spaces\ if\ needed\ to\ fix\ style menu-item "Insert spaces if needed to fix style" cperl-find-bad-style)
(Refresh\ \"hard\"\ constructions menu-item "Refresh \"hard\" constructions" cperl-find-pods-heres)
(nil-11 menu-item "----")
(Indent\ region menu-item "Indent region" cperl-indent-region :enable
(cperl-use-region-p))
(Comment\ region menu-item "Comment region" cperl-comment-region :enable
(cperl-use-region-p))
(Uncomment\ region menu-item "Uncomment region" cperl-uncomment-region :enable
(cperl-use-region-p))
(nil-15 menu-item "----")
(Run menu-item "Run" mode-compile :enable
(fboundp 'mode-compile))
(Kill menu-item "Kill" mode-compile-kill :enable
(and
(fboundp 'mode-compile-kill)
(get-buffer "*compilation*")))
(Next\ error menu-item "Next error" next-error :enable
(get-buffer "*compilation*"))
(Check\ syntax menu-item "Check syntax" cperl-check-syntax :enable
(fboundp 'mode-compile))
(nil-20 menu-item "----")
(Debugger menu-item "Debugger" cperl-db)
(nil-22 menu-item "----")
(Tools menu-item "Tools"
(keymap "Tools"
(Imenu menu-item "Imenu" imenu :enable
(fboundp 'imenu))
(Imenu\ on\ Perl\ Info menu-item "Imenu on Perl Info" cperl-imenu-on-info :enable
(featurep 'imenu))
(nil menu-item "----")
(Ispell\ PODs menu-item "Ispell PODs" cperl-pod-spell :enable
(or
(get-text-property
(point-min)
'in-pod)
(<
(progn
(and cperl-syntaxify-for-menu
(cperl-update-syntaxification
(point-max)
(point-max)))
(next-single-property-change
(point-min)
'in-pod nil
(point-max)))
(point-max))))
(Ispell\ HERE-DOCs menu-item "Ispell HERE-DOCs" cperl-here-doc-spell :enable
(<
(progn
(and cperl-syntaxify-for-menu
(cperl-update-syntaxification
(point-max)
(point-max)))
(next-single-property-change
(point-min)
'here-doc-group nil
(point-max)))
(point-max)))
(Narrow\ to\ this\ HERE-DOC menu-item "Narrow to this HERE-DOC" cperl-narrow-to-here-doc :enable
(eq 'here-doc
(progn
(and cperl-syntaxify-for-menu
(cperl-update-syntaxification
(point)
(point)))
(get-text-property
(point)
'syntax-type))))
(Select\ this\ HERE-DOC\ or\ POD\ section menu-item "Select this HERE-DOC or POD section" cperl-select-this-pod-or-here-doc :enable
(memq
(progn
(and cperl-syntaxify-for-menu
(cperl-update-syntaxification
(point)
(point)))
(get-text-property
(point)
'syntax-type))
'(here-doc pod)))
(nil-7 menu-item "----")
(CPerl\ pretty\ print\ \(experimental\) menu-item "CPerl pretty print (experimental)" cperl-ps-print :enable
(fboundp 'ps-extend-face-list))
(nil-9 menu-item "----")
(Syntaxify\ region menu-item "Syntaxify region" cperl-find-pods-heres-region :enable
(cperl-use-region-p))
(Profile\ syntaxification menu-item "Profile syntaxification" cperl-time-fontification)
(Debug\ errors\ in\ delayed\ fontification menu-item "Debug errors in delayed fontification" cperl-emulate-lazy-lock)
(Debug\ unwind\ for\ syntactic\ scan menu-item "Debug unwind for syntactic scan" cperl-toggle-set-debug-unwind)
(Debug\ backtrace\ on\ syntactic\ scan\ \(BEWARE!!!\) menu-item "Debug backtrace on syntactic scan (BEWARE!!!)" menu-function-298 :key-sequence nil)
(nil-15 menu-item "----")
(Class\ Hierarchy\ from\ TAGS menu-item "Class Hierarchy from TAGS" cperl-tags-hier-init)
(Tags menu-item "Tags"
(keymap "Tags"
(Create\ tags\ for\ current\ file menu-item "Create tags for current file" menu-function-299 :key-sequence nil)
(Add\ tags\ for\ current\ file menu-item "Add tags for current file" menu-function-300 :key-sequence nil)
(Create\ tags\ for\ Perl\ files\ in\ directory menu-item "Create tags for Perl files in directory" menu-function-301 :key-sequence nil)
(Add\ tags\ for\ Perl\ files\ in\ directory menu-item "Add tags for Perl files in directory" menu-function-302 :key-sequence nil)
(Create\ tags\ for\ Perl\ files\ in\ \(sub\)directories menu-item "Create tags for Perl files in (sub)directories" menu-function-303 :key-sequence nil)
(Add\ tags\ for\ Perl\ files\ in\ \(sub\)directories menu-item "Add tags for Perl files in (sub)directories" menu-function-304 :key-sequence nil)))))
(Perl\ docs menu-item "Perl docs"
(keymap "Perl docs"
(Define\ word\ at\ point menu-item "Define word at point" imenu-go-find-at-position :enable
(fboundp 'imenu-go-find-at-position))
(Help\ on\ function menu-item "Help on function" cperl-info-on-command)
(Help\ on\ function\ at\ point menu-item "Help on function at point" cperl-info-on-current-command)
(Help\ on\ symbol\ at\ point menu-item "Help on symbol at point" cperl-get-help)
(Perldoc menu-item "Perldoc" cperl-perldoc)
(Perldoc\ on\ word\ at\ point menu-item "Perldoc on word at point" cperl-perldoc-at-point)
(View\ manpage\ of\ POD\ in\ this\ file menu-item "View manpage of POD in this file" cperl-build-manpage)
(Auto-help\ on menu-item "Auto-help on" cperl-lazy-install :enable
(and
(fboundp 'run-with-idle-timer)
(not cperl-lazy-installed)))
(Auto-help\ off menu-item "Auto-help off" cperl-lazy-unstall :enable
(and
(fboundp 'run-with-idle-timer)
cperl-lazy-installed))))
(Toggle\.\.\. menu-item "Toggle..."
(keymap "Toggle..."
(Auto\ newline menu-item "Auto newline" cperl-toggle-auto-newline)
(Electric\ parens menu-item "Electric parens" cperl-toggle-electric)
(Electric\ keywords menu-item "Electric keywords" cperl-toggle-abbrev)
(Fix\ whitespace\ on\ indent menu-item "Fix whitespace on indent" cperl-toggle-construct-fix)
(Auto-help\ on\ Perl\ constructs menu-item "Auto-help on Perl constructs" cperl-toggle-autohelp)
(Auto\ fill menu-item "Auto fill" auto-fill-mode)))
(Indent\ styles\.\.\. menu-item "Indent styles..."
(keymap "Indent styles..."
(CPerl menu-item "CPerl" menu-function-305 :key-sequence nil)
(PerlStyle menu-item "PerlStyle" menu-function-306 :key-sequence nil)
(GNU menu-item "GNU" menu-function-307 :key-sequence nil)
(C++ menu-item "C++" menu-function-308 :key-sequence nil)
(K&R menu-item "K&R" menu-function-309 :key-sequence nil)
(BSD menu-item "BSD" menu-function-310 :key-sequence nil)
(Whitesmith menu-item "Whitesmith" menu-function-311 :key-sequence nil)
(Memorize\ Current menu-item "Memorize Current" menu-function-312 :key-sequence nil)
(Memorized menu-item "Memorized" menu-function-313 :key-sequence nil :enable cperl-old-style)))
(Micro-docs menu-item "Micro-docs"
(keymap "Micro-docs"
(Tips menu-item "Tips" menu-function-314 :key-sequence nil)
(Problems menu-item "Problems" menu-function-315 :key-sequence nil)
(Speed menu-item "Speed" menu-function-316 :key-sequence nil)
(Praise menu-item "Praise" menu-function-317 :key-sequence nil)
(Faces menu-item "Faces" menu-function-318 :key-sequence nil)
(CPerl\ mode menu-item "CPerl mode" menu-function-319 :key-sequence nil)
(CPerl\ version menu-item "CPerl version" menu-function-320 :key-sequence nil))))