5 # The latest update : 05/14/97 at 23:22:38
7 #@(#) A new SCCS file is created if no SCCS. If one have SCCS, delta commands.
10 #@(#) Usage : sccsPut [SourceFileName]
23 while [ `echo $1 | cut -c1` = "-" ]
31 echo "Enter SourceFileName"
42 EosSCCSHome=$EOS_HOME/sccs
45 for file in ${filename}
47 FullName=${currentDir}/${file}
48 Name=`basename ${FullName}`
49 Dir=`dirname ${FullName}`
50 echo Full=${FullName} Name=${Name} EosHome=$EOS_HOME
52 currentSCCSDir=`echo $Dir | awk '{gsub(/\/[.a-zA-Z0-9\/]*\/Eos\//, ""); print $0}'`
53 sccsDir=${EosSCCSHome}/${currentSCCSDir}
54 echo sccsDir=${sccsDir} currentSCCSDir=${currentSCCSDir}
69 if [ -f ${sccsDir}/s.${Name} ]
71 get -e ${sccsDir}/s.${Name}
73 echo "No sccs files are found."
77 chmod ${Executable} ${Name}