Lines Matching defs:doc
96 (defmacro defgroup (name val doc &rest arr)
99 (defmacro defcustom (name val doc &rest arr)
100 (` (defvar (, name) (, val) (, doc)))))
725 $CPAN/doc/manual/info/perl5-old/perl5-info.tar.gz
727 $CPAN/doc/manual/info/perl5/pod2texi-0.1.tar.gz
958 `font-lock-constant-face' HERE-doc delimiters, labels, delimiters of
1153 (cperl-define-key "\C-c\C-d" 'cperl-here-doc-spell)
1154 (cperl-define-key "\C-c\C-n" 'cperl-narrow-to-here-doc)
1285 ["Ispell HERE-DOCs" cperl-here-doc-spell
1289 (next-single-property-change (point-min) 'here-doc-group nil (point-max)))
1291 ["Narrow to this HERE-DOC" cperl-narrow-to-here-doc
1292 (eq 'here-doc (progn
1297 cperl-select-this-pod-or-here-doc
1302 '(here-doc pod))]
2701 (defvar cperl-look-for-prop '((pod in-pod) (here-doc-delim here-doc-group)))
2729 ((and (memq res '(pod here-doc here-doc-delim format))
2755 (if (memq prop '(pod here-doc format here-doc-delim))
2995 (here-doc nil) ; via `syntax-type' property
2996 (here-doc-delim nil) ; via `syntax-type' property
3614 ;; Start-to-end is marked `here-doc-group' ==> t
3615 ;; The body is marked `syntax-type' ==> `here-doc'
3616 ;; The delimiter is marked `syntax-type' ==> `here-doc-delim'
3751 (defun cperl-find-pods-heres (&optional min max non-inter end ignore-max end-of-here-doc)
3900 here-doc-group t
3978 here-doc-group t
4076 (if c ; Not here-doc
4093 (if end-of-here-doc
4094 (goto-char end-of-here-doc))
4119 'syntax-type 'here-doc)
4121 'syntax-type 'here-doc-delim)
4122 (put-text-property b e1 'here-doc-group t)
4886 '(pod here-doc here-doc-delim))
4973 ;; '(pod here-doc here-doc-delim))
4974 (if (get-text-property (point) 'here-doc-group)
4977 (cperl-beginning-of-property (point) 'here-doc-group))
5400 '(pod here-doc)))
6672 (format "Find doc for Perl function (default %s): "
7616 '(pod here-doc format))))
7625 (defvar cperl-doc-buffer " *perl-doc*"
7655 (cperl-switch-to-doc-buffer)
7657 ;; lookup in the doc
8093 (defun cperl-switch-to-doc-buffer (&optional interactive)
8096 (let ((buf (get-buffer-create cperl-doc-buffer)))
8730 (defun cperl-here-doc-spell (&optional beg end)
8757 (if do-heres 'here-doc-group 'in-pod)
8779 (defun cperl-get-here-doc-region (&optional pos pod)
8785 (if (or (eq 'here-doc (get-text-property pos 'syntax-type))
8792 (defun cperl-narrow-to-here-doc (&optional pos)
8797 (let ((p (cperl-get-here-doc-region pos)))
8803 (defun cperl-select-this-pod-or-here-doc (&optional pos)
8807 (let ((p (cperl-get-here-doc-region pos t)))
8812 (message "I do not think POS is in POD or a HERE-doc..."))))