PATCH: substring() beyond end of string

[robin]

--- Sablot-0.40/Sablot/expr.cpp Fri Jun 30 11:23:25 2000
+++ Sablot-0.40-patched/Sablot/expr.cpp Wed Jul  5 00:55:51 2000
@@ -2325,6 +2325,7 @@
     assert(source);
     int len = strlen(source);
     if (from < 0) from = 0;
+    if (to >= len) to = len-1;
     if ((from >= len) || ((to != -1) && (from > to)))
         s = "";
     else