* scm/dictrans.scm: Allow to call without arguments if --cleanup

option is given.
* configure.ac (AC_CONFIG_FILES): Add data/pl/Makefile
* data/*.xml: Move to data/ru
* data/Makefile.am: Rewrite:
* data/ru: New directory
* data/pl: New directory
* data/pl/Makefile.am: New file.
* data/pl/setup.xml: New file.
* data/pl/0.xml: New file.


git-svn-id: file:///home/puszcza/svnroot/ellinika/trunk@507 941c8c0f-9102-463b-b60b-cd22ce0e6858

1 files changed, 7 insertions, 2 deletions

diff --git a/scm/dictrans.scm b/scm/dictrans.scm
index 6c55765..7161e2d 100644
--- a/scm/dictrans.scm
+++ b/scm/dictrans.scm
@@ -992,7 +992,7 @@ Informational options:
  (getopt-long (command-line) grammar))
  
        
-(if (null? input-files)
+(if (and (null? input-files) (not cleanup-option))
     (begin
       (display "Input files not specified\n" (current-error-port))
       (exit 1)))
@@ -1026,7 +1026,12 @@ Informational options:
 
   (if cleanup-option
       (cleanup-db conn))
-  
+
+  (if (null? input-files)
+      (begin
+        (sql-connect-close conn)
+        (exit 0)))
+      
   (get-dict-index conn)
 
   (insert-categories conn)