diff --git a/bepascal/bepascal/be/support/String.cpp b/bepascal/bepascal/be/support/String.cpp
index 37e236d..3ca4f16 100644
--- a/bepascal/bepascal/be/support/String.cpp
+++ b/bepascal/bepascal/be/support/String.cpp
@@ -491,11 +491,16 @@ BString &
 BString_Truncate(BString *String, int32 newLength,
                   bool lazy)
 {
-   return String->Truncate(newLength,
-                  lazy);
+#ifdef B_BEOS_VERSION_DANO
+	// Dano's Truncate doesn't have the 'lazy' parameter
+	return String->Truncate(newLength);
+#else
+   return String->Truncate(newLength, lazy);
+#endif
 }
 
 
+
 /*
  *  Method: BString::Remove()
  *   Descr: