+ call initvariantmanager on msdos system unit startup

git-svn-id: branches/i8086@24075 -

rtl/msdos/system.pp

@@ -217,4 +217,5 @@ begin
    AllFilesMask := '*.*';
 { Reset IO Error }
   InOutRes:=0;
+  initvariantmanager;
 end.