added git module

.gitmodules

@@ -0,0 +1,3 @@
+[submodule "radiance"]
+path = themes/radiance
+url = git://github.com/barak/color-theme-radiance.git 

custom.el

@@ -105,22 +105,16 @@
   )
 (require 'slime)
 (slime-setup)
+;;; CHICKEN SCHEME
+(add-to-list 'load-path "/var/lib/chicken/5/")
+   ; Where Eggs are installed
+(autoload 'chicken-slime "chicken-slime" "SWANK backend for Chicken" t)
+(add-hook 'scheme-mode-hook
+          (lambda ()
+            (slime-mode t)))
 
-;; vala mode
-
-(autoload 'vala-mode "vala-mode" "Major mode for editing Vala code." t)
-(add-to-list 'auto-mode-alist '("\\.vala$" . vala-mode))
-(add-to-list 'auto-mode-alist '("\\.vapi$" . vala-mode))
-(add-to-list 'file-coding-system-alist '("\\.vala$" . utf-8))
-(add-to-list 'file-coding-system-alist '("\\.vapi$" . utf-8))
-
-;; use technomancy's marmalade.
-;;(add-to-list 'package-archives '("marmalade" . "http://marmalade-repo.org/packages/"))
-
-
-;; chicken scheme
+(require 'quack)
 (require 'cmuscheme)
-
 (define-key scheme-mode-map "\C-c\C-l" 'scheme-load-current-file)
 (define-key scheme-mode-map "\C-c\C-k" 'scheme-compile-current-file)
 
@@ -130,12 +124,13 @@
     (comint-check-source file-name)
     (setq scheme-prev-l/c-dir/file (cons (file-name-directory    file-name)
                                          (file-name-nondirectory file-name)))
-    (comint-send-string (scheme-proc) (concat "(load \""
-                                              file-name
-                                              "\"\)\n"))
+    (comint-send-string (scheme-proc)
+                        (concat "(load \""
+                                file-name
+                                "\"\)\n"))
     (if switch
         (switch-to-scheme t)
-        (message "\"%s\" loaded." file-name) ) ) )
+      (message "\"%s\" loaded." file-name))))
 
 (defun scheme-compile-current-file (&optional switch)
   (interactive "P")
@@ -144,12 +139,24 @@
     (setq scheme-prev-l/c-dir/file (cons (file-name-directory    file-name)
                                          (file-name-nondirectory file-name)))
     (message "compiling \"%s\" ..." file-name)
-    (comint-send-string (scheme-proc) (concat "(compile-file \""
-                                              file-name
-                                              "\"\)\n"))
+    (comint-send-string (scheme-proc)
+                        (concat "(compile-file \""
+                                file-name
+                                "\"\)\n"))
     (if switch
         (switch-to-scheme t)
-        (message "\"%s\" compiled and loaded." file-name) ) ) )
+      (message "\"%s\" compiled and loaded." file-name))))
+
+;; vala mode
+
+(autoload 'vala-mode "vala-mode" "Major mode for editing Vala code." t)
+(add-to-list 'auto-mode-alist '("\\.vala$" . vala-mode))
+(add-to-list 'auto-mode-alist '("\\.vapi$" . vala-mode))
+(add-to-list 'file-coding-system-alist '("\\.vala$" . utf-8))
+(add-to-list 'file-coding-system-alist '("\\.vapi$" . utf-8))
+
+;; use technomancy's marmalade.
+;;(add-to-list 'package-archives '("marmalade" . "http://marmalade-repo.org/packages/"))
 
 
 
@@ -163,3 +170,16 @@
 
 ;; bit.ly shortcuts from within emacs
 
+(custom-set-variables
+ ;; custom-set-variables was added by Custom.
+ ;; If you edit it by hand, you could mess it up, so be careful.
+ ;; Your init file should contain only one such instance.
+ ;; If there is more than one, they won't work right.
+ '(quack-manuals (quote ((r5rs "R5RS" "http://www.schemers.org/Documents/Standards/R5RS/HTML/" nil) (bigloo "Bigloo" "http://www-sop.inria.fr/mimosa/fp/Bigloo/doc/bigloo.html" nil) (chez "Chez Scheme User's Guide" "http://www.scheme.com/csug/index.html" nil) (chicken "Chicken User's Manual" "http://wiki.call-cc.org/man/4/The%20User's%20Manual" nil) (gambit "Gambit-C home page" "http://www.iro.umontreal.ca/~gambit/" nil) (gauche "Gauche Reference Manual" "http://www.shiro.dreamhost.com/scheme/gauche/man/gauche-refe.html" nil) (mitgnu-ref "MIT/GNU Scheme Reference" "http://www.gnu.org/software/mit-scheme/documentation/scheme.html" nil) (mitgnu-user "MIT/GNU Scheme User's Manual" "http://www.gnu.org/software/mit-scheme/documentation/user.html" nil) (mitgnu-sos "MIT/GNU Scheme SOS Reference Manual" "http://www.gnu.org/software/mit-scheme/documentation/sos.html" nil) (plt-mzscheme "PLT MzScheme: Language Manual" plt t) (plt-mzlib "PLT MzLib: Libraries Manual" plt t) (plt-mred "PLT MrEd: Graphical Toolbox Manual" plt t) (plt-framework "PLT Framework: GUI Application Framework" plt t) (plt-drscheme "PLT DrScheme: Programming Environment Manual" plt nil) (plt-insidemz "PLT Inside PLT MzScheme" plt nil) (plt-tools "PLT Tools: DrScheme Extension Manual" plt nil) (plt-mzc "PLT mzc: MzScheme Compiler Manual" plt t) (plt-r5rs "PLT R5RS" plt t) (scsh "Scsh Reference Manual" "http://www.scsh.net/docu/html/man-Z-H-1.html" nil) (sisc "SISC for Seasoned Schemers" "http://sisc.sourceforge.net/manual/html/" nil) (htdp "How to Design Programs" "http://www.htdp.org/" nil) (htus "How to Use Scheme" "http://www.htus.org/" nil) (t-y-scheme "Teach Yourself Scheme in Fixnum Days" "http://www.ccs.neu.edu/home/dorai/t-y-scheme/t-y-scheme.html" nil) (tspl "Scheme Programming Language (Dybvig)" "http://www.scheme.com/tspl/" nil) (sicp "Structure and Interpretation of Computer Programs" "http://mitpress.mit.edu/sicp/full-text/book/book-Z-H-4.html" nil) (slib "SLIB" "http://swissnet.ai.mit.edu/~jaffer/SLIB.html" nil) (faq "Scheme Frequently Asked Questions" "http://www.schemers.org/Documents/FAQ/" nil))))
+ '(quack-programs (quote ("csc" "bigloo" "csi" "csi -hygienic" "gosh" "gracket" "gsi" "gsi ~~/syntax-case.scm -" "guile" "kawa" "mit-scheme" "racket" "racket -il typed/racket" "rs" "scheme" "scheme48" "scsh" "sisc" "stklos" "sxi"))))
+(custom-set-faces
+ ;; custom-set-faces was added by Custom.
+ ;; If you edit it by hand, you could mess it up, so be careful.
+ ;; Your init file should contain only one such instance.
+ ;; If there is more than one, they won't work right.
+ )

init.el

@@ -55,8 +55,8 @@
 (require 'starter-kit-registers)
 (require 'starter-kit-eshell)
 (require 'starter-kit-lisp)
-(require 'starter-kit-perl)
-(require 'starter-kit-ruby)
+;;(require 'starter-kit-perl)
+;;(require 'starter-kit-ruby)
 (require 'starter-kit-python)
 (require 'starter-kit-js)