ld/yasnippet
1
0
Fork 0
mirror of https://github.com/joaotavora/yasnippet.git synced 2025-10-13 13:13:03 +00:00
Code Issues Packages Projects Releases Wiki Activity

bugfix: fix #245

Browse Source
This commit is contained in:
Joao Tavora 2012-05-23 11:44:27 +01:00
parent cfd92598e8
commit c9bd102cb3
1 changed files with 18 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
yasnippet.el
View File

@ -2860,13 +2860,24 @@ have, compare through the field's start point"
(defun yas/field-probably-deleted-p (snippet field)
"Guess if SNIPPET's FIELD should be skipped."
(and (zerop (- (yas/field-start field) (yas/field-end field)))
(or (yas/field-parent-field field)
(and (eq field (car (last (yas/snippet-fields snippet))))
(= (yas/field-start field) (overlay-end (yas/snippet-control-overlay snippet)))))
;; the field numbered 0, just before the exit marker, should
;; never be skipped
(not (zerop (yas/field-number field)))))
(and
;; field must be zero lentgh
;;
(zerop (- (yas/field-start field) (yas/field-end field)))
;; skip if:
(or
;; 1) is a nested field and it's been modified
;;
(and (yas/field-parent-field field)
(yas/field-modified-p field))
;; 2) ends just before the snippet end
;;
(and (eq field (car (last (yas/snippet-fields snippet))))
(= (yas/field-start field) (overlay-end (yas/snippet-control-overlay snippet)))))
;; the field numbered 0, just before the exit marker, should
;; never be skipped
;;
(not (zerop (yas/field-number field)))))
(defun yas/snippets-at-point (&optional all-snippets)
"Return a sorted list of snippets at point, most recently