diff --git a/src/samplesrc/fatreaddsk.pla b/src/samplesrc/fatreaddsk.pla
index c9bd9be..2d0264d 100644
--- a/src/samplesrc/fatreaddsk.pla
+++ b/src/samplesrc/fatreaddsk.pla
@@ -97,7 +97,7 @@ def bigFatWrite(buf, len)
     return xferLen
 end
 
-def fatWriteImage(src, drv)
+def fatReadImage(src, drv)
     word copyBuf, copyLen, freeAddr
     word blocknum, bufblk
     
@@ -161,10 +161,10 @@ if ^arg
         puts("Speed test writing 143K to SD card");
     fin
     if getYN("\nContinue? (Y/N)")
-        fatWriteImage(image, unit)
+        fatReadImage(image, unit)
     fin
 else
     puts("Read DSK image from floppy disk drive\n")
     puts("Usage: +FATREADDSK <DSK image file> [1,2,T]\n")
 fin
-done
\ No newline at end of file
+done