From ab5c1069e63fcc6de2f2fc580329ac863865dd3c Mon Sep 17 00:00:00 2001 From: Ramakrishnan Muthukrishnan Date: Tue, 23 Dec 2014 12:50:34 +0530 Subject: [PATCH] remove go-mode, slime and other cruft. --- init.el | 52 +++++++++++++--------------------------------------- 1 file changed, 13 insertions(+), 39 deletions(-) diff --git a/init.el b/init.el index 3c57e33..9f0ad8b 100644 --- a/init.el +++ b/init.el @@ -40,7 +40,7 @@ (package-refresh-contents)) ;; make sure my list of packages are installed -(setq package-list '(rust-mode haskell-mode monokai-theme ghc slime go-mode)) +(setq package-list '(rust-mode haskell-mode monokai-theme ghc)) ; install the missing packages (dolist (package package-list) @@ -52,11 +52,14 @@ ;; erc (require 'erc) +(require 'tls) +(setq tls-program '("openssl s_client -connect %h:%p -no_ssl2 -ign_eof")) (erc-autojoin-mode t) (setq erc-autojoin-channels-alist - '((".*\\.freenode.net" "#haskell" "#tahoe-lafs") - (".*\\.oftc.net" "#LeastAuthority"))) + '((".*\\.freenode.net" "#haskell-beginners") + (".*\\.oftc.net" "#LeastAuthority") + (".*\\.saju.net.in" "#cs"))) ;; check channels (erc-track-mode t) @@ -70,8 +73,9 @@ "Connect to IRC." (interactive) (when (y-or-n-p "Do you want to start IRC? ") - (erc :server "irc.freenode.net" :port 6667 :nick "rkrishnan" :full-name "Ramakrishnan Muthukrishnan") - (erc :server "irc.oftc.net" :port 6667 :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") + (erc-tls :server "saju.net.in" :port 6697 :nick "ramki" :full-name "Ramakrishnan Muthukrishnan"))) ;; switch to ERC with Ctrl+c e (global-set-key (kbd "C-c e") 'start-erc) ;; ERC @@ -79,8 +83,10 @@ ;; haskell mode (setenv "PATH" (concat "~/.cabal/bin:" (getenv "PATH"))) (add-to-list 'exec-path "~/.cabal/bin") +;; (add-hook 'haskell-mode-hook 'haskell-indent-mode) +;; (add-hook 'haskell-mode-hook 'interactive-haskell-mode) (add-hook 'haskell-mode-hook 'turn-on-haskell-indent) -;; (add-hook 'haskell-mode-hook 'turn-on-haskell-indentation) +(add-hook 'haskell-mode-hook 'turn-on-haskell-indentation) ;; ocaml (add-hook 'tuareg-mode-hook 'tuareg-imenu-set-imenu) @@ -107,36 +113,4 @@ (autoload 'ghc-init "ghc" nil t) (autoload 'ghc-debug "ghc" nil t) (add-hook 'haskell-mode-hook (lambda () (ghc-init))) - -;; erc -(require 'erc) - -(erc-autojoin-mode t) -(setq erc-autojoin-channels-alist -'((".*\\.freenode.net" "#tahoe-lafs") -(".*\\.oftc.net" "#LeastAuthority"))) - -;; check channels -(erc-track-mode t) -(setq erc-track-exclude-types '("JOIN" "NICK" "PART" "QUIT" "MODE" - -"324" "329" "332" "333" "353" "477")) -;; don't show any of this -(setq erc-hide-list '("JOIN" "PART" "QUIT" "NICK")) - -(defun start-erc () -"Connect to IRC." -(interactive) -(when (y-or-n-p "Do you want to start IRC? ") -(erc :server "irc.freenode.net" :port 6667 :nick "rkrishnan" :full-name "Ramakrishnan Muthukrishnan") -(erc :server "irc.oftc.net" :port 6667 :nick "rkrishnan" :full-name "Ramakrishnan Muthukrishnan"))) - -;; switch to ERC with Ctrl+c e -(global-set-key (kbd "C-c e") 'start-erc) ;; ERC - -;; sbcl -(setq inferior-lisp-program "/usr/local/bin/sbcl") -(require 'slime-autoloads) -(add-to-list 'slime-contribs '(slime-fancy)) -(eval-after-load 'slime - `(define-key slime-prefix-map (kbd "M-h") 'slime-documentation-lookup)) + -- 2.37.2