"Enhance" CP/M drive login

diff --git a/avr/z180-serv.c b/avr/z180-serv.c
index 25ffc9cbd836dda44212c55ad6345ed71adc9f18..65ce8819374760bfa2e032a242e5dee56242b373 100644 (file)
--- a/avr/z180-serv.c
+++ b/avr/z180-serv.c
@@ -442,6 +442,10 @@ void do_msg_cpm_login(uint8_t subf, int len, uint8_t * msg)
                return msg_cpm_result(subf, 0x03, res);
        }
 
+       f_close(&dp->fd);
+       res = f_open(&dp->fd, dp->img_name,
+                       FA_READ | (dp->opt&DRV_OPT_RO ? 0 : FA_WRITE));
+
        dp->flags |= DRV_FLG_OPEN;
 
        /* send  result*/