From baebe67bf59028a972b781932680cb627b1a3d90 Mon Sep 17 00:00:00 2001
From: mpv <mpv@opencascade.com>
Date: Mon, 10 Oct 2016 14:45:26 +0300
Subject: [PATCH] Fix for #1831: root directory build but not requested

---
 src/Model/Model_Document.cpp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/Model/Model_Document.cpp b/src/Model/Model_Document.cpp
index fdfaa6f69..852050fd9 100755
--- 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
-- 
2.39.2