13 lines
No EOL
393 B
Text
13 lines
No EOL
393 B
Text
# name: class ... end
|
|
# contributor: hitesh <hitesh.jasani@gmail.com>
|
|
# key: cls
|
|
# --
|
|
class ${1:`(let ((fn (capitalize (file-name-nondirectory
|
|
(file-name-sans-extension
|
|
(or (buffer-file-name)
|
|
(buffer-name (current-buffer))))))))
|
|
(cond
|
|
((string-match "_" fn) (replace-match "" nil nil fn))
|
|
(t fn)))`}
|
|
$0
|
|
end |