diff --git a/sigma/sigma_dk.c b/sigma/sigma_dk.c
index 54e120e0..220bceb0 100644
--- a/sigma/sigma_dk.c
+++ b/sigma/sigma_dk.c
@@ -25,7 +25,7 @@
 
    dk           7250/7251-7252 cartridge disk
 
-   02-Jul-2022  RMS     Fixed bugs in multi-unit operation
+   02-Jul-22    RMS     Fixed bugs in multi-unit operation
 
    Transfers are always done a sector at a time.
 */
diff --git a/sigma/sigma_dp.c b/sigma/sigma_dp.c
index 903e88dc..66407c17 100644
--- a/sigma/sigma_dp.c
+++ b/sigma/sigma_dp.c
@@ -25,7 +25,7 @@
 
    dp           moving head disk pack controller
 
-   02-Jul-2022  RMS     Fixed bugs in multi-unit operation
+   02-Jul-22    RMS     Fixed bugs in multi-unit operation
    29-Jun-22    RMS     Fixed initialization errors in ctrl, seek units (Ken Rector)
    28-Jun-22    RMS     Fixed off-by-1 error in DP_SEEK definition (Ken Rector)
    07-Jun-22    RMS     Removed unused variables (V4)
diff --git a/sigma/sigma_mt.c b/sigma/sigma_mt.c
index fa2706fe..2e114016 100644
--- a/sigma/sigma_mt.c
+++ b/sigma/sigma_mt.c
@@ -25,7 +25,7 @@
 
    mt           7320 and 7322/7323 magnetic tape
 
-   02-Jul-2022  RMS     Fixed bugs in multi-unit operation
+   02-Jul-22    RMS     Fixed bugs in multi-unit operation
    07-Jun-22    RMS     Removed unused variables (V4)
    26-Mar-22    RMS     Added extra case points for new MTSE definitions
    23-Mar-20    RMS     Unload should call sim_tape_detach (Mark Pizzolato)
diff --git a/sigma/sigma_rad.c b/sigma/sigma_rad.c
index 8de5b490..845abbdb 100644
--- a/sigma/sigma_rad.c
+++ b/sigma/sigma_rad.c
@@ -25,7 +25,7 @@
 
    rad          7211/7212 or 7231/7232 fixed head disk
 
-   02-Jul-2022  RMS     Fixed bugs in multi-unit operation
+   02-Jul-22    RMS     Fixed bugs in multi-unit operation
 
    The RAD is a head-per-track disk.  To minimize overhead, the entire RAD
    is buffered in memory.
@@ -337,7 +337,7 @@ switch (rad_cmd) {
             rad_flags |= RADV_WPE;                      /* set status */
             chan_uen (dva);                             /* uend */
             return SCPE_OK;
-            }                                           /* fall through */
+            }
         if (rad_inv_ad (&da)) {                         /* invalid addr? */
             chan_uen (dva);                             /* uend */
             return SCPE_OK;