elisp: Actually make the snippets use tab stop fields

Snippets used to look like (func ARG$0 MORE-ARG), which is not very
usable. This changes all generic snippets from that form into something
that actually uses tab stop fields and decriptive field names.
This commit is contained in:
Lowe Thiderman 2016-01-20 19:23:36 +01:00
parent 7087ec64f3
commit 2d40b76e33
18 changed files with 18 additions and 18 deletions

View file

@ -3,4 +3,4 @@
#key: add-hook
#key: ah
# --
(add-hook HOOK$0 FUNCTION)
(add-hook ${1:hook} ${2:function})

View file

@ -2,4 +2,4 @@
#name: aref
#key: aref
# --
(aref ARRAY$0 INDEX)
(aref ${1:array} {2:index})

View file

@ -2,4 +2,4 @@
#name: aset
#key: aset
# --
(aset ARRAY$0 IDX NEWELT)
(aset ${1:array} ${2:index} ${3:element})

View file

@ -2,4 +2,4 @@
#name: assq
#key: assq
# --
(assq KEY$0 LIST)
(assq ${1:key} ${2:list})

View file

@ -3,4 +3,4 @@
#key: buffer-substring
#key: bs
# --
(buffer-substring START$0 END)
(buffer-substring ${1:start} ${2:end})

View file

@ -3,4 +3,4 @@
#key: buffer-substring-no-properties
#key: bsnp
# --
(buffer-substring-no-properties START$0 END)
(buffer-substring-no-properties ${1:start} ${2:end})

View file

@ -3,4 +3,4 @@
#key: define-key
#key: dk
# --
(define-key KEYMAPNAME$0 (kbd "M-b") 'FUNCNAME)
(define-key ${1:mode}-map (kbd "${2:key}") $0)

View file

@ -2,4 +2,4 @@
#name: get
#key: get
# --
(get SYMBOL$0 PROPNAME)
(get ${1:symbol} {2:propname})

View file

@ -3,4 +3,4 @@
#key: global-set-key
#key: gsk
# --
(global-set-key (kbd "C-$0") 'COMMAND)
(global-set-key (kbd "${1:key}") $0)

View file

@ -2,4 +2,4 @@
#name: mapc
#key: mapc
# --
(mapc '$0 SEQUENCE)
(mapc ${1:function} $0)

View file

@ -3,4 +3,4 @@
#key: match-beginning
#key: mb
# --
(match-beginning N$0)
(match-beginning $0)

View file

@ -3,4 +3,4 @@
#key: match-end
#key: me
# --
(match-end N$0)
(match-end $0)

View file

@ -2,4 +2,4 @@
#name: memq
#key: memq
# --
(memq ELT$0 LIST)
(memq ${1:element} ${2:list})

View file

@ -2,7 +2,7 @@
# name: minor_mode
# key: minor
# --
(defvar ${1:mode}-modeline-indicator " ${2:INDICATOR}"
(defvar ${1:mode}-modeline-indicator " ${2:indicator}"
"call ($1-install-mode) again if this is changed")
(defvar $1-mode nil)

View file

@ -2,4 +2,4 @@
#name: nth
#key: nth
# --
(nth N$0 LIST)
(nth ${1:index} ${2:list})

View file

@ -2,4 +2,4 @@
#name: put
#key: put
# --
(put $0 PROPNAME VALUE)
(put ${1:symbol} ${2:propname} ${3:value})

View file

@ -3,4 +3,4 @@
#key: set-file-modes
#key: sfm
# --
(set-file-modes $0 MODE)
(set-file-modes ${1:filename} $0)

View file

@ -2,4 +2,4 @@
#name: yes-or-no-p
#key: yes-or-no-p
# --
(yes-or-no-p "PROMPT$0 ")
(yes-or-no-p "${1:prompt} ")