Commits

Moritz Heidkamp committed a2c6973

some updates

  • Participants
  • Parent commits ce21fad

Comments (0)

Files changed (8)

 (load-my 'org)
 (load-my 'ruby)
 (load-my 'highline)
+(load-my 'css)
+(load-my 'twitter)
+(load-my 'markdown)
 
 ;; ido
 (load-my 'ido)

File my/clojure.el

      (with 'defun)
      (it 'defun)
      (do-it 'defun)
-     (let-uri-parts 'defun)))
+     (Feature 'defun)
+     (Scenario 'defun)
+     (cond-let 'defun)))
 
 ;; slime
 (eval-after-load 'slime
+(add-to-list 'auto-mode-alist '("\\.scss$" . css-mode))

File my/markdown.el

+(add-to-list 'auto-mode-alist '("\\.md$" . markdown-mode))
+
+(add-hook 'markdown-mode-hook
+          (lambda ()
+            (define-key markdown-mode-map
+              (kbd "M-n")
+              'forward-paragraph)
+
+            (define-key markdown-mode-map
+              (kbd "M-p")
+              'backward-paragraph)))
 (add-to-list 'auto-mode-alist '("\\.rake$" . ruby-mode))
 (add-to-list 'auto-mode-alist '("/Gemfile$" . ruby-mode))
+(add-to-list 'auto-mode-alist '("/Rakefile$" . ruby-mode))
 
 (defun ruby-end-return ()
   "Called when RET-key is pressed."

File my/scheme.el

-(add-to-list 'auto-mode-alist '("\\.scss$" . scheme-mode))
 (add-to-list 'auto-mode-alist '("\\.sxml$" . scheme-mode))
 (add-to-list 'auto-mode-alist '("\\.setup$" . scheme-mode))
 (add-to-list 'auto-mode-alist '("\\.meta$" . scheme-mode))
      (defun scheme-module-indent (state indent-point normal-indent) 0)
 
      (put 'module 'scheme-indent-function 'scheme-module-indent)
+     (put 'call-with-values 'scheme-indent-function 0)
      (put 'parameterize 'scheme-indent-function 1)
      (put 'receive 'scheme-indent-function 2)
      (put 'when 'scheme-indent-function 1)
      (put 'test 'scheme-indent-function 0)
      (put 'regex-case 'scheme-indent-function 1)
      (put 'and-let* 'scheme-indent-function 1)
+     (put 'let-keywords 'scheme-indent-function 2)
      (put 'let-values 'scheme-indent-function 1)
      (put 'let*-values 'scheme-indent-function 1)
      (put 'with-headers 'scheme-indent-function 1)
      (put 'describe 'scheme-indent-function 1)
      (put 'context 'scheme-indent-function 1)
      (put 'define/let 'scheme-indent-function 1)
-     (put 'with-exclusive-transaction 'scheme-indent-function 1)))
+     (put 'with-exclusive-transaction 'scheme-indent-function 1)
+     (put 'with-semaphore 'scheme-indent-function 1)
+     (put 'with-locked-channel 'scheme-indent-function 1)))
 
      ;; Avoids that some unicode characters blow up the Slime connection
      ;; to the swank server
-     (setq slime-net-coding-system 'utf-8-unix)))
+     (setq slime-net-coding-system 'utf-8-unix)
+
+     (add-hook 'slime-mode-hook 'set-up-slime-hippie-expand)
+     (add-hook 'slime-repl-mode-hook 'set-up-slime-hippie-expand)))

File my/twitter.el

+(require 'twittering-mode)
+(setq twittering-use-master-password t)
+(setq twittering-icon-mode t)
+(setq twittering-use-native-retweet t)
+
+(define-key twittering-mode-map
+  (kbd "F") 'twittering-follow)
+
+(define-key twittering-mode-map
+  (kbd "R") 'twittering-reply-to-user)