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

* field protection problem solved, I guess

Browse Source 
* on to the transformations, escapes and indent
This commit is contained in:
capitaomorte 2009-07-05 22:28:21 +00:00
parent f31a071457
commit 354580b8f7
1 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
yasnippet.el
View File

@ -74,6 +74,9 @@ current column if this variable is non-`nil'.")
(define-key yas/keymap yas/next-field-key 'yas/next-field)
(define-key yas/keymap yas/clear-field-key 'yas/clear-field)
(define-key yas/keymap (kbd "S-TAB") 'yas/prev-field)
(define-key yas/keymap (kbd "<DEL>") 'yas/prev-field)
(define-key yas/keymap (kbd "DEL") 'yas/prev-field)
(define-key yas/keymap (kbd "<deletechar>") 'yas/prev-field)
(define-key yas/keymap (kbd "<S-iso-lefttab>") 'yas/prev-field)
(define-key yas/keymap (kbd "<S-tab>") 'yas/prev-field)
(define-key yas/keymap (kbd "<backtab>") 'yas/prev-field)
@ -535,7 +538,8 @@ the template of a snippet in the current snippet-table."
(and yas/active-field-overlay
(overlay-buffer yas/active-field-overlay)
(overlay-get yas/active-field-overlay 'yas/field)))))
(delete-region (yas/field-start field) (yas/field-end field))))
(let ((inhibit-modification-hooks t))
(delete-region (yas/field-start field) (yas/field-end field)))))
(defun yas/on-field-overlay-modification (overlay after? beg end &optional length)
"To be written"
@ -1147,9 +1151,7 @@ when the condition evaluated to non-nil."
(dolist (ov yas/field-protection-overlays)
(overlay-put ov 'face 'yas/field-debug-face)
;; (overlay-put ov 'evaporate t)
(overlay-put ov 'modification-hooks '(yas/on-protection-overlay-modification))
(overlay-put ov 'insert-in-front-hooks '(yas/on-protection-overlay-modification))
(overlay-put ov 'insert-behind-hooks '(yas/on-protection-overlay-modification))))))
(overlay-put ov 'modification-hooks '(yas/on-protection-overlay-modification))))))
(defun yas/move-to-field (snippet field)