summaryrefslogtreecommitdiffstats
path: root/emacs.d/snippets/delphi-mode/procedure.yasnippet
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--emacs.d/snippets/delphi-mode/procedure.yasnippet3
1 files changed, 1 insertions, 2 deletions
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