VISWANAT@SNYCORBA.BITNET (02/11/88)
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!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!