Mercurial > hg > Members > kono > nitros9-code

diff level1/cmds/rename.asm @ 185:3a84dad1f851

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
made further changes
author boisy
date Sat, 13 Jul 2002 20:22:10 +0000
parents 6641a883d6b0
children e9ce43cc215e
line wrap: on
line diff
--- a/level1/cmds/rename.asm	Sat Jul 13 05:02:03 2002 +0000
+++ b/level1/cmds/rename.asm	Sat Jul 13 20:22:10 2002 +0000
@@ -51,7 +51,7 @@
          os9   I$Open   
          bcs   L00A5
 L0032    stx   <u0005
-         ldb   #$00
+         ldb   #SS.Opt
          leax  <u0020,u
          os9   I$GetStt 
          bcs   L00A5
@@ -66,7 +66,7 @@
          lda   #C$CR
          sta   -1,x
          ldx   <u0000
-         lda   #$03
+         lda   #READ.+WRITE.
          os9   I$ChgDir 
          bcs   L00A5
          ldx   <u0005
@@ -106,7 +106,8 @@
 L00A5    os9   F$Exit   
 L00A8    ldb   #E$BPNam
          bra   L00A5
-L00AC    fdb   $2E0D
+L00AC    fcc   "."
+         fcb   C$CR
 L00AE    ldx   <u0000
          bsr   L00F6
          ldu   <u0000