From f19dd70ece015509d52d0e9a7c113ccccad96e0e Mon Sep 17 00:00:00 2001 From: Alexander Sulfrian Date: Tue, 15 Dec 2009 11:31:46 +0100 Subject: added winring with ecb-compatibility, more delphi-mode improvments --- emacs.d/snippets/delphi-mode/procedure.yasnippet | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'emacs.d/snippets/delphi-mode/procedure.yasnippet') diff --git a/emacs.d/snippets/delphi-mode/procedure.yasnippet b/emacs.d/snippets/delphi-mode/procedure.yasnippet index 8834d8c..9e3a08e 100644 --- a/emacs.d/snippets/delphi-mode/procedure.yasnippet +++ b/emacs.d/snippets/delphi-mode/procedure.yasnippet @@ -3,9 +3,8 @@ # name: procedure # key: proc # condition: (not (delphi-in-class-definition)) -# expand-env: ((yas/indent-line 'auto) (yas/wrap-around-region 'nil) (yas/also-auto-indent-first-line 't)) # -- -procedure ${1:Name$(capitalize text)}($2); +procedure ${1:$$(yas/choose-value (let (value) (dolist (element (delphi-get-classes) value) (setq value (cons (concat element ".") value)))))}${2:Name$(capitalize text)}($3); begin $0 end; \ No newline at end of file -- cgit v1.2.3