init.el

;;;
;;; General Settings
;;;

;;;
;;; mac key set up - command key now works like meta
;;; Code:
(setq mac-command-modifier 'meta)
(setq mac-option-modifier 'super)

;;;
;;; Makes cmd-3 output a # on a mac
;;;
(global-set-key (kbd "M-3") '(lambda () (interactive) (insert "#")))

;;;
;;; Switch on arrow keys in edtor buffers
;;; Code:
(setq prelude-guru nil)

;;;
;;; Full screen toggle using command+[RET]
;;; Code:
(defun toggle-fullscreen ()
  (interactive)
  (set-frame-parameter nil 'fullscreen (if (frame-parameter nil 'fullscreen)
                                           nil
                                         'fullboth)))

(global-set-key [(meta return)] 'toggle-fullscreen)

;;;
;;; Cider
;;;
(require 'cider)

(setq cider-stacktrace-default-filters '(tooling dup))
(add-hook 'cider-mode-hook 'cider-turn-on-eldoc-mode)
(setq nrepl-buffer-name-show-port t)

(setq cider-repl-history-file "~/.emacs.d/savefile/cider-repl/repl.session")
;;(require 'icomplete)
(add-hook 'cider-repl-mode-hook 'subword-mode)
;;(add-hook 'cider-repl-mode-hook 'paredit-mode)
(add-hook 'cider-repl-mode-hook 'smartparens-strict-mode)
;;; remote hosts to connect to
;;; (setq cider-known-endpoints '(("host-a" "10.10.10.1" "7888") ("host-b" "7888")))

;; (setq nrepl-hide-special-buffers t
;;       cider-repl-pop-to-buffer-on-connect nil
;;       cider-show-error-buffer t)

;;;
;;; Org mode
;;;

;; Use the dev latest version of org for better clojure
;; support for babel
;;
(add-to-list 'load-path "~/repos/org-mode/lisp")
(require 'org)
(require 'ob-clojure)

;; Load the markdown converter - doesn't seem to work
;; without
;;
;; This is where I try - probably mistakenly - to get the packages to
;; be explicitly loaded. I was concerned that old versions might be being loaded
;; from the org that sips with emacs
;;
;;(eval-after-load "org"
;;  '(require 'ob-exp))
;;(eval-after-load "org"
;;  '(require 'ob-clojure))
;;(eval-after-load "org"
;;  '(require 'ox))
;;(eval-after-load "org"
;;  '(require 'ox-md nil t))

;;; Babel
(org-babel-do-load-languages
 'org-babel-load-languages
 '((emacs-lisp . t)
   (js . t)
   (clojure . t)))

;; Use cider as the clojure execution backend
(setq org-babel-clojure-backend 'cider)
;; Don't think that this is needed here...
(require 'cider)

;; Let's have pretty source code blocks
;; (setq org-edit-src-content-indentation 0
;;       org-src-tab-acts-natively t
;;       org-src-fontify-natively t
;;       org-confirm-babel-evaluate nil)

;;; Agenda files
(setq org-agenda-files '("~/org"))



(provide 'init)
;;; init.el ends here