                  (ack-args "--perl --js --html --css")
                  (compile-cmd nil)
                  (index-find-cmd (lambda (content)
-'                          ; TODO: 
+                          ; TODO: 
                           ; 1) Update to use regex to split up basedir, instead of hard-coding data.
                           ; 2) It'd be nice to use src-patterns and ignore-patterns
                           (let* (

                                 (hostname "velouria.sr.unh.edu")
                                 (start-dir "/web/humanf")
                                 (find-cmd (concat "cd \"" start-dir "\"; find '.' -type f "
                                                   (mk-proj-find-cmd-src-args mk-proj-src-patterns))))
                            (when (mk-proj-get-vcs-path)
                              (setq find-cmd (concat find-cmd " -not -path " (mk-proj-get-vcs-path))))
                            
                            (concat "ssh " hostname " \"" find-cmd "\""))))
                 (startup-hook (lambda ()
                                 (make-directory (file-name-directory (expand-file-name mk-proj-file-list-cache)) t)
                                 (make-directory (file-name-directory (expand-file-name mk-proj-open-files-cache)) t)

                 (vcs git)
                 (ack-args "--perl --js --html --css")
                 (compile-cmd nil)
                 ;; (src-find-cmd (lambda (context)

                 ;;          ; TODO: 
                 ;;          ; 1) Update to use regex to split up basedir, instead of hard-coding data.
                 ;;          ; 2) It'd be nice to use src-patterns and ignore-patterns

                 ;;          (let* (
                 ;;                 (hostname "lithium.sr.unh.edu")
                 ;;                 (start-dir "/web/epscor")
                 ;;                 (find-cmd (concat "cd \"" start-dir "\"; find '.' -type f "
                 ;;                                   (mk-proj-find-cmd-src-args mk-proj-src-patterns))))
                 ;;            (when (mk-proj-get-vcs-path)
                 ;;              (setq find-cmd (concat find-cmd " -not -path " (mk-proj-get-vcs-path))))
                            
                 ;;            (concat "ssh " hostname " \"" find-cmd "\""))))

                 (index-find-cmd (lambda (contet)
                          ; TODO: 
