fix volume device

This commit is contained in:
Kelvin Sherlock 2015-08-14 21:43:27 -04:00
parent 37b79d95da
commit c989d6854c
1 changed files with 9 additions and 1 deletions

View File

@ -35,7 +35,10 @@ volume procname export
stz tool_error
lda dev_num
lda fst_parms.dev1_num
; if no device, find a volume by name...
beq by_name
jsr id_disk
bcc got_it
cmp #dup_volume
@ -92,6 +95,11 @@ exit
rtl
by_name
lda #unknown_vol
sec
rtl
volume_dcb_0
dc.w VolumeRec.deviceName, do_ignore
dc.w VolumeRec.volName, do_vol_name_0