  ;; disable the damn splash-screen
 (setq inhibit-splash-screen t)
 
-(setq scheme-program-name "guile")
- ;; (setq scheme-program-name "kawa")
+ ;; (setq scheme-program-name "guile")
+ ;; (setq scheme-program-name "racket")
+(setq scheme-program-name "kawa")
 (setq fill-column 79)
 (setq-default indent-tabs-mode nil)
 

      (newline-and-indent)
      (insert (format log-entry-format class-name function-name)))))

(setq package-archives '(("gnu" . "http://elpa.gnu.org/packages/")
                         ("marmalade" . "http://marmalade-repo.org/packages/")
                         ("melpa" . "http://melpa.milkbox.net/packages/")))

(defun load-env-tags()
  (interactive)

  (interactive)
  (hipchat-join "tpg_ro_bento"))

(defun show-or-hide-shell ()
  (interactive)
  (if (and
