Function: srecode-semantic-handle-:region

srecode-semantic-handle-:region is a byte-compiled function defined in args.el.gz.

Signature

(srecode-semantic-handle-:region DICT)

Documentation

Add macros into the dictionary DICT based on the current :region.

Source Code

;; Defined in /usr/src/emacs/lisp/cedet/srecode/args.el.gz
(defun srecode-semantic-handle-:region (dict)
  "Add macros into the dictionary DICT based on the current :region."
  ;; Only enable the region section if we can clearly show that
  ;; the user is intending to do something with the region.
  (when (or srecode-handle-region-when-non-active-flag
	    (eq last-command 'mouse-drag-region)
	    (and transient-mark-mode mark-active))
    ;; Show the region section
    (srecode-dictionary-show-section dict "REGION")
    (srecode-dictionary-set-value
     dict "REGIONTEXT" (buffer-substring-no-properties (point) (mark)))
    ;; Only whack the region if our template output
    ;; is also destined for the current buffer.
    (when (eq standard-output (current-buffer))
      (kill-region (point) (mark))))
  )