remove obsolete access to obsolete environment variable

ca

@@ -2,14 +2,12 @@
 
 # ca* by Dirk Zimoch
 # $Source: /cvs/G/EPICS/App/scripts/ca,v $
-# $Date: 2011/07/04 08:07:07 $
+# $Date: 2011/07/05 07:38:17 $
 
 regsub -all {\$} {ca* by Dirk Zimoch
 $Source: /cvs/G/EPICS/App/scripts/ca,v $
-$Revision: 1.17 $
-$Date: 2011/07/04 08:07:07 $} {} version
-
-set auto_path [concat $env(SLSBASE)/lib/tcl $auto_path]
+$Revision: 1.18 $
+$Date: 2011/07/05 07:38:17 $} {} version
 
 proc printHelp {} {
     puts {usage: caget [flags] <channel> [<channel> ...]}