diff --git a/cg/cglib04.cpp b/cg/cglib04.cpp
index a8e56a7df..a774ef235 100755
--- a/cg/cglib04.cpp
+++ b/cg/cglib04.cpp
@@ -3405,7 +3405,7 @@ int packindex(bool vis, int num, TString& name)
   d.get(num,_nolock, _nordir,_sysdirop);
   d.get(num,_nolock, (d.is_com()) ? _comdir : _nordir);
   r.get(num);                
-  err=DB_packindex(vis, name, r.rec(), &peod);
+  err=DB_packindex(vis, name, r.rec(), &peod,TRUE);
   if (err != NOERR) err = get_error(err);
 
 #ifdef DBG