Fixes #83

matortheeternal · Dec 29, 2015 · e2b181a · e2b181a
1 parent d4bdf59
commit e2b181a
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/lib/mte/mteHelpers.pas b/lib/mte/mteHelpers.pas
@@ -173,8 +173,9 @@ function ShortenVersion(vs: string; numClauses: Integer): string;
 var
   i, numDots: Integer;
 begin
+  Result := '';
   numDots := 0;
-  for i := 0 to Pred(Length(vs)) do begin
+  for i := 1 to Pred(Length(vs)) do begin
     if vs[i] = '.' then
       Inc(numDots);
     if numDots = numClauses then