code.delx.au - gnu-emacs-elpa/blob - snippets/text-mode/ruby-mode/cls

   1 #name : class ... end
   2 #contributor : hitesh <hitesh.jasani@gmail.com>
   3 #group : definitions
   4 # --
   5 class ${1:$$
   6          (let ((fn (capitalize (file-name-nondirectory
   7                                  (file-name-sans-extension
   8                                    (buffer-file-name))))))
   9            (cond
  10              ((string-match "_" fn) (replace-match "" nil nil fn))
  11               (t fn)))}
  12   $0
  13 end