home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Club Amiga de Montreal - CAM
/
CAM_CD_1.iso
/
files
/
488.lha
/
csh_v5.0
/
sample.sh
< prev
next >
Wrap
Text File
|
1991-03-12
|
926b
|
33 lines
# first a few useful aliases
al d "dir -hq" # hides .info and block lengths
al lst "ls -t" # sorts by access time
al lsl "ls -l" # sorts by length
# sc searches *.c, even 'sc -c main()' works
al sc "%a search @pickopts( $a ) *.c @pickargs( $a )
# edf edits a function in Cygnus Ed if the name starts in the first column:
al edf "%func set b \"\";search -afl *.c $func | inp b;\
if $b;split b file line;ed $file;waitforport rexx_ced;\
inc line 1;rxs rexx_ced \"jump to file \"$file \"jumpto \"$line\" 0\";\
else;\
echo Not found;\
endif
# this aliases suppress wild card expansion for certain commands
al zoo "*a Zoo $a
al lharc "*a Lharc $a
al lz "*a Lz $a
al newlist "*a Newlist $a
# pushd pushes the current directory on a stack
# popd retrieves it from there
set stk ""
al pushd "set stk $_cwd @subwords( $stk 1 10 );"
al popd "\\cd @first( $stk );set stk @subwords( $stk 2 10 );"