Function: semantic-grammar-edits-new-change-hook-fcn
semantic-grammar-edits-new-change-hook-fcn is a byte-compiled function
defined in grammar.el.gz.
Signature
(semantic-grammar-edits-new-change-hook-fcn OVERLAY)
Documentation
Function set into semantic-edits-new-change-hook.
Argument OVERLAY is the overlay created to mark the change. When OVERLAY marks a change in the scope of a nonterminal tag extend the change bounds to encompass the whole nonterminal tag.
Source Code
;; Defined in /usr/src/emacs/lisp/cedet/semantic/grammar.el.gz
(defun semantic-grammar-edits-new-change-hook-fcn (overlay)
"Function set into `semantic-edits-new-change-hook'.
Argument OVERLAY is the overlay created to mark the change.
When OVERLAY marks a change in the scope of a nonterminal tag extend
the change bounds to encompass the whole nonterminal tag."
(let ((outer (car (semantic-find-tag-by-overlay-in-region
(semantic-edits-os overlay)
(semantic-edits-oe overlay)))))
(if (semantic-tag-of-class-p outer 'nonterminal)
(move-overlay overlay
(semantic-tag-start outer)
(semantic-tag-end outer)))))