emacs: Added flx (glorious!), removed some unused settings and functions
This commit is contained in:
		
							parent
							
								
									580f642d40
								
							
						
					
					
						commit
						006043d82e
					
				
					 4 changed files with 6 additions and 20 deletions
				
			
		|  | @ -73,19 +73,6 @@ | |||
|       (find-file (concat "/sudo:root@localhost:" (ido-read-file-name "File: "))) | ||||
|     (find-alternate-file (concat "/sudo:root@localhost:" buffer-file-name)))) | ||||
| 
 | ||||
| (defun esk-suck-it (suckee) | ||||
|   "Insert a comment of appropriate length about what can suck it." | ||||
|   (interactive "MWhat can suck it? ") | ||||
|   (let ((prefix (concat ";; " suckee " can s")) | ||||
|         (postfix "ck it!") | ||||
|         (col (current-column))) | ||||
|     (insert prefix) | ||||
|     (dotimes (_ (- 80 col (length prefix) (length postfix))) (insert "u")) | ||||
|     (insert postfix))) | ||||
| 
 | ||||
| (defun esk-turn-off-tool-bar () | ||||
|   (if (functionp 'tool-bar-mode) (tool-bar-mode -1))) | ||||
| 
 | ||||
| (defun speak (m &optional voice) | ||||
|   (shell-command (if 'voice (concat "say -v " voice " \"" m "\"") | ||||
| 		   (concat "say " m)))) | ||||
|  |  | |||
|  | @ -1,4 +1,4 @@ | |||
| (mapc 'require '(projectile)) | ||||
| (mapc 'require '(projectile hi2)) | ||||
| ;; Initializes modes I use. | ||||
| 
 | ||||
| (add-hook 'prog-mode-hook 'esk-pretty-lambdas) | ||||
|  | @ -12,12 +12,6 @@ | |||
| (add-to-list 'auto-mode-alist '("\\.markdown\\'" . markdown-mode)) | ||||
| (add-to-list 'auto-mode-alist '("\\.md\\'" . markdown-mode)) | ||||
| 
 | ||||
| ;; Configure haskell-mode | ||||
| ;; Enable semi-automatic indentation and font-locking | ||||
| (require 'hi2) | ||||
| ;;(add-hook 'haskell-mode-hook 'turn-on-hi2) | ||||
| ;;(add-hook 'haskell-mode-hook 'font-lock-mode) | ||||
| 
 | ||||
| ;; Add keybindings to move nested blocks with C-, rsp. C-. | ||||
| (define-key haskell-mode-map (kbd "C-,") 'haskell-move-nested-left) | ||||
| (define-key haskell-mode-map (kbd "C-.") 'haskell-move-nested-right) | ||||
|  |  | |||
|  | @ -3,6 +3,10 @@ | |||
| (tool-bar-mode -1) | ||||
| (scroll-bar-mode -1) | ||||
| 
 | ||||
| (flx-ido-mode 1) | ||||
| (setq ido-use-faces nil) | ||||
| (setq gc-cons-threshold 20000000) | ||||
| 
 | ||||
| ;;; Code: | ||||
| 
 | ||||
| (add-to-list 'exec-path "/usr/local/bin") | ||||
|  |  | |||
|  | @ -18,6 +18,7 @@ | |||
|     browse-kill-ring | ||||
|     clojure-mode | ||||
|     flycheck | ||||
|     flx-ido | ||||
|     haskell-mode | ||||
|     hi2 | ||||
|     idle-highlight-mode | ||||
|  |  | |||
		Loading…
	
	Add table
		Add a link
		
	
		Reference in a new issue