capitalize mod name.
This commit is contained in:
parent
921c002321
commit
100178c8ad
@ -21,8 +21,7 @@
|
|||||||
(message "Nothing to be done"))))
|
(message "Nothing to be done"))))
|
||||||
|
|
||||||
(defun ghc-insert-module-template ()
|
(defun ghc-insert-module-template ()
|
||||||
;; xxx mod from filename...
|
(let ((mod (capitalize (file-name-sans-extension (buffer-name)))))
|
||||||
(let ((mod (file-name-sans-extension (buffer-name))))
|
|
||||||
(insert "module " mod " where\n")))
|
(insert "module " mod " where\n")))
|
||||||
|
|
||||||
(defun ghc-sort-lines (beg end)
|
(defun ghc-sort-lines (beg end)
|
||||||
|
Loading…
Reference in New Issue
Block a user