From 2e0110f37ebfa1a74f89eb87fbac9166cfa99ab1 Mon Sep 17 00:00:00 2001
From: Mark Pizzolato <mark@infocomm.com>
Date: Mon, 12 Jun 2017 19:00:07 -0700
Subject: [PATCH] I1620: Fix text of I/O Error in CDP device

As discussed in #472
---
 I1620/i1620_cd.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/I1620/i1620_cd.c b/I1620/i1620_cd.c
index 98b2e08c..cf89a42c 100644
--- a/I1620/i1620_cd.c
+++ b/I1620/i1620_cd.c
@@ -534,7 +534,7 @@ fputs (cdp_buf, cdp_unit.fileref);                      /* write card */
 cdp_unit.pos = ftell (cdp_unit.fileref);                /* count char */
 if (ferror (cdp_unit.fileref)) {                        /* error? */
     ind[IN_WRCHK] = 1;
-    sim_perror ("CDR I/O error");
+    sim_perror ("CDP I/O error");
     clearerr (cdp_unit.fileref);
     return SCPE_IOERR;
     }