Function: opascal-tab
opascal-tab is an interactive and byte-compiled function defined in
opascal.el.gz.
This command is obsolete since 24.4; use indent-for-tab-command
instead.
Signature
(opascal-tab)
Documentation
Indent the region, if Transient Mark mode is on and the region is active.
Otherwise, indent the current line or insert a TAB, depending on the
value of opascal-tab-always-indents and the current line position.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/progmodes/opascal.el.gz
(defun opascal-tab ()
"Indent the region, if Transient Mark mode is on and the region is active.
Otherwise, indent the current line or insert a TAB, depending on the
value of `opascal-tab-always-indents' and the current line position."
(interactive)
(cond ((use-region-p)
;; If Transient Mark mode is enabled and the region is active, indent
;; the entire region.
(indent-region (region-beginning) (region-end)))
((or opascal-tab-always-indents
(save-excursion (skip-chars-backward opascal-space-chars) (bolp)))
;; Otherwise, if we are configured always to indent (regardless of the
;; point's position in the line) or we are before the first non-space
;; character on the line, indent the line.
(opascal-indent-line))
(t
;; Otherwise, insert a tab character.
(insert "\t"))))