home *** CD-ROM | disk | FTP | other *** search
/ back2roots/padua / padua.7z / padua / shell / SKsh017.lzh / scr_source / cleard.s < prev    next >
Encoding:
Text File  |  1991-04-26  |  376 b   |  16 lines
  1. #!c:sksh
  2.  
  3. #*************************************************************************
  4. # This function clears the directory stack.
  5. #*************************************************************************
  6.  
  7.    if [ "$1" = '-?' ]
  8.    then
  9.       echo 'Usage:' $(basename $0)
  10.       echo '       (clears directory stack)'
  11.       return 1
  12.    fi
  13.  
  14.    DIRSTACK = ''
  15.    export -l DIRSTACK
  16.