;; font
;; (set-default-font "Inconsolata-12")
+(set-default-font "InconsolataGo-12")
;; Don't let Emacs hurt your ears
(setq visible-bell t)
(erc-autojoin-mode t)
(setq erc-autojoin-channels-alist
- '((".*\\.freenode.net" "#tahoe-lafs") ;; #inferno "#plan9chan" "#cat-v")
- (".*\\.oftc.net" "#LeastAuthority")))
+ '((".*\\.freenode.net" "#haskell-beginners" "#tahoe-lafs")
+ (".*\\.oftc.net" "#LeastAuthority")
+;; (".*\\.mozilla.org" "#rust-beginners")
+ ))
;; check channels
(erc-track-mode t)
"Connect to IRC."
(interactive)
(when (y-or-n-p "Do you want to start IRC? ")
- ;;(erc-tls :server "irc.mozilla.org" :port 6697 :nick "rkrishnan" :full-name "Ramakrishnan Muthukrishnan")
+ ;; (erc-tls :server "irc.mozilla.org" :port 6697 :nick "rkrishnan" :full-name "Ramakrishnan Muthukrishnan")
(erc-tls :server "irc.freenode.net" :port 6697 :nick "rkrishnan" :full-name "Ramakrishnan Muthukrishnan")
(erc-tls :server "irc.oftc.net" :port 6697 :nick "rkrishnan" :full-name "Ramakrishnan Muthukrishnan")))
(require 'hs-lint)
(defun my-haskell-mode-hook ()
(local-set-key "\C-cl" 'hs-lint))
+
(add-hook 'haskell-mode-hook 'my-haskell-mode-hook)
;; gofmt
;; company mode for auto completion
(add-hook 'after-init-hook 'global-company-mode)
+;; Reduce the time after which the company auto completion popup opens
+(setq company-idle-delay 0.2)
+
+;; Reduce the number of characters before company kicks in
+(setq company-minimum-prefix-length 1)
+
+;; Set path to racer binary
+(setq racer-cmd "/home/ram/.cargo/bin/racer")
+
+(add-hook 'rust-mode-hook
+ '(lambda ()
+ (racer-activate)
+ (racer-turn-on-eldoc)
+ (add-hook 'flycheck-mode-hook #'flycheck-rust-setup)
+ (set (make-local-variable 'company-backends) '(company-racer))
+ (local-set-key (kbd "M-.") #'racer-find-definition)
+ (local-set-key (kbd "TAB") #'racer-complete-or-indent)))
+
;; highlight todo
;; (add-hook 'prog-mode-hook 'highlight-todos)