diff --git a/Source/DOH/Doh/fio.c b/Source/DOH/Doh/fio.c
index c35e036b2..e221310b8 100644
--- a/Source/DOH/Doh/fio.c
+++ b/Source/DOH/Doh/fio.c
@@ -265,7 +265,7 @@ DohvPrintf(DOH *so, const char *format, va_list ap)
 	doh = va_arg(ap, DOH *);
 	if (DohCheck(doh)) {
 	  /* Is a DOH object. */
- 	  if (DohIsString(doh)) {
+ 	  if (DohIsString(doh) && (ObjType(doh) == DOHTYPE_STRING)) {
 	    Sval = doh;
 	  } else {
 	    Sval = Str(doh);