changeset 872:ad7443c6b53d

Fixed problem where dir wasn't being forked
author boisy
date Thu, 16 Jan 2003 21:18:13 +0000
parents 62049cad9bf4
children c70da2076f02
files level1/cmds/deldir.asm
diffstat 1 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/level1/cmds/deldir.asm	Thu Jan 16 20:33:00 2003 +0000
+++ b/level1/cmds/deldir.asm	Thu Jan 16 21:18:13 2003 +0000
@@ -156,10 +156,11 @@
 DIR      fcc   "DIR"
          fcb   C$CR
 DIROPTS  fcc   "-E "
+DIROPTL  equ   *-DIROPTS
 L0145    pshs  u
          leau  <buffer,u
          pshs  u
-         ldb   #$02
+         ldb   #DIROPTL
          leax  <DIROPTS,pcr
          lbsr  L0270
          ldx   <parmptr
@@ -274,6 +275,7 @@
          fcb   C$CR
 ATTROPTS fcc   " -d"
          fcb   C$CR
+ATTROPTL equ   *-ATTROPTS
 L0242    pshs  u
          leau  <buffer,u
          pshs  u
@@ -282,7 +284,7 @@
          ldx   <parmptr
          bsr   L0270
          leax  <ATTROPTS,pcr
-         ldb   #$04
+         ldb   #ATTROPTL
          bsr   L0270
          tfr   u,d
          subd  ,s