Plan 9 from Bell Labs’s /usr/web/sources/contrib/stallion/rc/pushd

Copyright © 2021 Plan 9 Foundation.
Distributed under the MIT License.
Download the Plan 9 distribution.


#!/bin/rc
# pushd - push onto the directory stack
# fn pushd {. /bin/pushd $*}

if(~ $#* 0){
	if(~ $#dirstack 0)
		echo >[1=2] pushd: dirstack empty
	if not{
		dir=$dirstack(1)
		dirstack=(`{pwd} $dirstack(2-))
	}
}
if not{
	dir=`{cleanname -d `{pwd} $1}
	dirstack=(`{pwd} $dirstack)
}
if(! ~ $#dirstack 0)
	cd $dir && dirs
status=''

Bell Labs OSI certified Powered by Plan 9

(Return to Plan 9 Home Page)

Copyright © 2021 Plan 9 Foundation. All Rights Reserved.
Comments to [email protected].