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
	 Kazu Yamamoto
						Kazu Yamamoto