From a28345ef8166ff2c8161bbaa5939a9a94e271cf3 Mon Sep 17 00:00:00 2001
From: alex <alex@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Fri, 28 Apr 1995 13:14:15 +0000
Subject: [PATCH] Corretta creazione files

git-svn-id: svn://10.65.10.50/trunk@1311 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 include/isam.cpp | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/include/isam.cpp b/include/isam.cpp
index 2a35fa817..895c66b60 100755
--- a/include/isam.cpp
+++ b/include/isam.cpp
@@ -901,7 +901,7 @@ int TSystemisamfile::build(TRecnotype eox)
   d.get(num());
   TFilename f(d.name());
 
-  f = f.path();
+  f = f.path(); if (!is_not_slash(f.right(1)[0])) f.rtrim(1);
   if (!fexist(f)) 
     make_dir(f);
 
@@ -1036,7 +1036,7 @@ int TSystemisamfile::update(TTrec& newrec, bool vis)
 
   TDir           dir;
 
-  dir.get(num(), _lock, _nordir, _sysdirop);
+  dir.get(num(), _unlock, _nordir, _sysdirop);
   const char p = *dir.name();
   const bool is_com = prefix().is_com();
   const bool toconvert = is_com ? dir.is_com() : dir.is_firm();
@@ -1079,7 +1079,7 @@ int TSystemisamfile::update(TTrec& newrec, bool vis)
       setstatus(err);
       return err;
     }
-    open(_excllock);
+    open();
     TFilename fname(filename());
     TString s(80);
     s.format("Aggiornamento archivio %s", (const char*) fname);