Path: utzoo!mnetor!uunet!seismo!sundc!pitstop!sun!amdcad!ames!pasteur!ucbvax!SNYCORBA.BITNET!VISWANAT
From: VISWANAT@SNYCORBA.BITNET
Newsgroups: comp.os.vms
Subject: PLEASE FORWARD TO INFO-VAX I COULDN'T THANKS
Message-ID: <8802152336.AA08727@ucbvax.Berkeley.EDU>
Date: 11 Feb 88 15:48:26 GMT
Sender: daemon@ucbvax.BERKELEY.EDU
Organization: The Internet
Lines: 27


 BYE  EVERYBODY!!!!!!!!!!!!
 I DON'T BELIEVE I AM DOING THIS. AFTER THE MULTITUDE OF SOLUTIONS WHICH
 WERE NOT AT ALL SOLUTIONS TO THE ORGINAL PROBLEM I THOUGHT I SHOULD
 PUT AN END TO IT. GUESS WHAT PROMPT AGAIN ]@#$%^&*()
 IN REPLY TO
>However, none of these retain the correct prompt if the default
>is changed.  You must execute the commands all over again.
>I have two command procedures from the net, SD.COM and CD.COM, which
>I will try when I have time.
>
>   Andy Wing   V2002A%TEMPLEVM.BITNET@CUNYVM.CUNY.EDU
 IN LOGIN.COM (OF COURSE IN YOUR LOGIN.COM)
          $LABEL1:
          $PROMPT = F$ENVIRONMENT("DEFAULT")
          $INQUIRE/NOPUNCTUATION ANS 'PROMPT'
          $IF ANS .EQS. "" THEN GOTO LABEL1
          $DEFINE/USER_MODE SYS$INPUT SYS$COMMAND/NOLOG
          $'ANS'
          $GOTO LABEL1
 WILL DO THE TRICK. YOU STAND UPSIDE DOWN, CHANGE DIRECTORIES,
 GO TO HELL AND COME BACK, LOGON A ZILLION TIMES      - MAGIC -
 THE PROMPT COMES WITH THE CURRENT DIRECTORY. THIS IS VERY USEFULL FOR
  ME I SUDDENLY BECOMES A MANAGER OR SYSTEM OR MYSEL OR OTHERS.
 FINAL NOTE THIS IS NOT MY ORGINAL CREATION.
 A FAVOR
 NO MORE COMMENTS PLEASE!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!