# HG changeset patch
# User robertgault
# Date 1226766476 0
# Node ID 342db2db851aa8460d7dc0bc30902f6b33f1a7f9
# Parent  a33c34f7f897cf9a89570da75338b075c9e8f01f
Removed more Close Open code. Now Copy and Verification loops indeed start at LSN1, not LSN0.

diff -r a33c34f7f897 -r 342db2db851a level1/cmds/backup.asm
--- a/level1/cmds/backup.asm	Sat Nov 15 04:52:35 2008 +0000
+++ b/level1/cmds/backup.asm	Sat Nov 15 16:27:56 2008 +0000
@@ -32,7 +32,7 @@
 
 DOHELP   set   1
 * Default 0 means do not save destination disk ID. 1 means save it. RG
-SAVEID    set   0
+SAVEID    set   1
 
 tylg     set   Prgrm+Objct   
 atrv     set   ReEnt+rev
@@ -360,17 +360,13 @@
 * Verification code
          leay  >vfypass,pcr
          lbsr  L0456
-         lda   <srcpath
-         os9   I$Close        close source path
-         bcs   L03AF
          lda   <dstpath
-         os9   I$Close        close destination path
-         bcs   L03AF
-         leax  <dstdev,u
-         lda   #READ.
-         os9   I$Open         open source path in READ mode
-         bcs   L03AF
          sta   <srcpath       save newly acquired path number
+         pshs  u
+         ldx   #$0000
+         leau  1,x
+         os9   I$Seek       seek to LSN0
+         puls  u
          clr   <curlsn
          clr   <curlsn+1
          clr   <curlsn+2