Fix for #1831: root directory build but not requested

diff --git a/src/Model/Model_Document.cpp b/src/Model/Model_Document.cpp
index fdfaa6f6970b47511770cd250fac59957c812b3d..852050fd9c6f789665590eb622128056faa50139 100755 (executable)
--- a/src/Model/Model_Document.cpp
+++ b/src/Model/Model_Document.cpp
@@ -222,9 +222,9 @@ bool Model_Document::save(
   Handle(Model_Application) anApp = Model_Application::getApplication();
   if (isRoot()) {
 #ifdef WIN32
-    CreateDirectory(theFileName, NULL);
+    CreateDirectory(theDirName, NULL);
 #else
-    mkdir(theFileName, 0x1ff);
+    mkdir(theDirName, 0x1ff);
 #endif
   }
   // filename in the dir is id of document inside of the given directory