(print "first block!")

(setq foo 'bar)

(format "foo is %s" foo)

(org-babel-do-load-languages
 'org-babel-load-languages
 '((org . t)))

(org-babel-do-load-languages
 'org-babel-load-languages
 '((calc . t)))

(add-to-list 'load-path "~/.emacs.d/xterm-color")
(add-to-list 'load-path "~/.emacs.d/rmoo")
(add-to-list 'load-path "~/.emacs.d/sly-1.0.43")
(add-to-list 'load-path "~/.emacs.d/slime-v2.28")

(require 'sly-autoloads)

(require 'slime-autoloads)

(require 'rmoo-autoload)
(require 'moocode-mode)
;;(require 'coldc-mode)
(global-set-key (kbd "C-c C-r") 'rmoo)
(add-to-list 'auto-mode-alist '("\\.moo$" . moocode-mode))
(add-hook 'rmoo-interactive-mode-hooks (lambda ()
(goto-address-mode t)))          ;; ... clickable links