 ;; check the environment
 (setq ct-tool (getenv "DTOOL"))
 (setq have-atria (let ((h-a (getenv "HAVE_ATRIA")))
-		   (if (string= h-a "yes") t '())))
+                   (if (string= h-a "yes") t '())))
 ;; (setq have-neartool (let ((h-n (getenv "HAVE_NEARTOOL")))
 ;;                          (if (string= h-n "yes") t '())))
 (setq is-cygwin (string= (getenv "OS") "CYGWIN_NT-4.0"))
 
 ;; (setq ct-command (cond
-;; 		  (is-cygwin "bash /install/tool/bin/neartool")
-;; 		  (have-atria "cleartool")
-;; 		  (have-neartool "neartool")
-;; 		  t nil))
+;;                   (is-cygwin "bash /install/tool/bin/neartool")
+;;                   (have-atria "cleartool")
+;;                   (have-neartool "neartool")
+;;                   t nil))
 
 ;; Load the Hightlight coloring scheme
 (if is-cygwin

  (interactive)
  (if (y-or-n-p "Ok to un-checkout? ")
      (progn
	(setq pname (file-name-nondirectory (buffer-file-name)))
	(ct-shell-command-verbose (concat "ctunco " pname))
	(ct-find-curr-file-again t)
	)
      (progn
	(message "Uncheckout canceled.")
	)
    )
)


   (have-atria
    (compile-internal
     (concat "cd `ctproj -r` ; clearmake -C gnu " target
             " |& grep -v \"clearmake: Warning: Config\"")
     "No more errors."))
   (is-cygwin
    (compile-internal
