Path: utzoo!utgpu!water!watmath!clyde!rutgers!cmcl2!husc6!mailrus!bcm!ut-sally!utah-cs!utah-gr!uplherc!sp7040!obie!wsccs!dhoward
From: dhoward@wsccs.UUCP (Dirk Howard)
Newsgroups: comp.os.vms
Subject: Re: prompt representing default...
Summary: Short DCL command to change directory and prompt
Message-ID: <153@wsccs.UUCP>
Date: 16 Feb 88 23:49:12 GMT
References: <0570893975@uwovax.UWO.CDN>
Lines: 30


Here is a DCL command procedure that will allow the prompt to contain
the directory path.  I use this on my own account.

CD.COM
-----------------------------------------------------------------------
$ set default 'p1'
$ dir = f$directory()
$ dir = f$extract(1,f$locate("]",dir)-1,dir)
$ set prompt="''dir' > "
$ exit
-----------------------------------------------------------------------

Now define the following symbol:

$ CD :== @device:[directory]cd

Where device and directory specify the device and directory the the
CD.COM file resides.  To change a directory use as follows:

$ CD [.subdir]

Your prompt should look like this.

DIRECTORY.SUBDIR > 

Goodluck and have fun.
					Dirk Howard

..!ihnp4!utah-cs!utah-gr!uplherc!sp7040!obie!wsccs!dhoward