16 files changed, 90 insertions, 157 deletions

diff --git a/Makefile.am b/Makefile.am
index 521b3e0..7fac923 100644
--- a/Makefile.am
+++ b/Makefile.am
@@ -43,3 +43,4 @@ install-html:
                         sed 's,^/,_,;s,\\.\\./,__/,g' | \
-                        while read S T; do ln -sf $$S $$T; done; \
+                        (cd $(DESTDIR)$(HTMLDIR)/$$dir; \
+                         while read S T; do ln -sf $$S $$T; done); \
                   fi; \
diff --git a/am/guile.m4 b/am/guile.m4
deleted file mode 100644
index c793a70..0000000
--- a/am/guile.m4
+++ /dev/null
@@ -1,110 +0,0 @@
-dnl This file is part of GNU mailutils.
-dnl Copyright (C) 2001,2004 Free Software Foundation, Inc.
-dnl
-dnl This program is free software; you can redistribute it and/or modify
-dnl it under the terms of the GNU General Public License as published by
-dnl the Free Software Foundation; either version 2 of the License, or
-dnl (at your option) any later version.
-dnl
-dnl This program is distributed in the hope that it will be useful,
-dnl but WITHOUT ANY WARRANTY; without even the implied warranty of
-dnl MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-dnl GNU General Public License for more details.
-dnl
-dnl You should have received a copy of the GNU General Public License
-dnl along with this program; if not, write to the Free Software
-dnl Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
-dnl
-
-dnl MU_RESULT_ACTIONS -- generate shell code for the result of a test
-dnl   $1 -- CVAR  -- cache variable to check
-dnl   $2 -- NAME  -- if not empty, used to generate a default value TRUE:
-dnl                  `AC_DEFINE(HAVE_NAME)'
-dnl   $2 -- TRUE  -- what to do if the CVAR is not `no'
-dnl   $3 -- FALSE -- what to do otherwise; defaults to `:'
-dnl
-AC_DEFUN([MU_RESULT_ACTIONS], [
-[if test "$$1" != "" -a "$$1" != no; then
-  ]ifelse([$3], ,
-          [AC_DEFINE(HAVE_]translit($2, [a-z ./<>], [A-Z___])[,1,[FIXME])],
-          [$3])[
-else
-  ]ifelse([$4], , [:], [$4])[
-fi]])dnl
-
-AC_DEFUN([MU_CHECK_GUILE],
-[
- if test "x$mu_cv_lib_guile" = x; then
-   cached=""
-   AC_PATH_PROG(GUILE_CONFIG, guile-config, no, $PATH)
-   if test $GUILE_CONFIG = no; then
-     mu_cv_lib_guile=no
-   else
-     GUILE_INCLUDES=`guile-config compile`
-     GUILE_LIBS=`guile-config link`
-   fi
-
-   if test $GUILE_CONFIG != no; then
-     AC_MSG_CHECKING(for guile version 1.6 or higher)
-     GUILE_VERSION=`($GUILE_CONFIG --version 2>&1; echo '')|sed -n 's/guile-config - Guile version \([[0-9]][[0-9]]*\)\.\([[0-9]][[0-9]]*\).*/\1\2/p'`
-     case "x$GUILE_VERSION" in
-     x[[0-9]]*)
-       if test $GUILE_VERSION -lt 16; then
-         AC_MSG_RESULT(Nope. Version number too low.)
-         mu_cv_lib_guile=no
-       else
-         AC_DEFINE_UNQUOTED(GUILE_VERSION, $GUILE_VERSION,
-                            [Guile version number: MAX*10 + MIN])
-         AC_MSG_RESULT(OK)
-         save_LIBS=$LIBS
-         save_CFLAGS=$CFLAGS
-         LIBS="$LIBS $GUILE_LIBS"
-         CFLAGS="$CFLAGS $GUILE_INCLUDES"
-         AC_TRY_LINK([#include <libguile.h>],
-                     ifelse([$1], , scm_shell(0, NULL);, [$1]),
-                     [mu_cv_lib_guile=yes],
-                     [mu_cv_lib_guile=no])
-         LIBS=$save_LIBS
-         CFLAGS=$save_CFLAGS
-       fi ;;
-     *) AC_MSG_RESULT(Nope. Unknown version number)
-        mu_cv_lib_guile=no;;
-     esac
-   fi
- else
-   cached=" (cached) "
-   GUILE_INCLUDES=`$GUILE_CONFIG compile`
-   GUILE_LIBS=`$GUILE_CONFIG link`
- fi
- AC_MSG_CHECKING(whether to build guile support)
- MU_RESULT_ACTIONS([mu_cv_lib_guile],[LIBGUILE],[$2],[$3])
- AC_MSG_RESULT(${cached}$mu_cv_lib_guile)
-
- if test $mu_cv_lib_guile = yes; then
-   AC_ARG_WITH([guiledir],
-               AC_HELP_STRING([--with-guiledir=DIR],
-                              [Specify the directory to install guile modules to]),
-               [case $withval in
-                /*) GUILE_SITE=$withval;;
-                yes) GUILE_SITE=`$GUILE_CONFIG info pkgdatadir`/site;;
-                *)  AC_MSG_ERROR([Argument to --with-guiledir must be an absolute directory name]);;
-                esac],
-               [GUILE_SITE=`$GUILE_CONFIG info pkgdatadir`/site
-                pfx=$prefix 
-                test "x$pfx" = xNONE && pfx=$ac_default_prefix
-                case $GUILE_SITE in
-                $pfx/*) ;; # OK
-                *) AC_MSG_WARN([guile site directory "$GUILE_SITE" lies outside your current prefix ($pfx).])
-                   GUILE_SITE='$(datadir)/guile/site'
-                   AC_MSG_WARN([Falling back to ${GUILE_SITE} instead. Use --with-guiledir to force using site directory.])
-                   ;;
-                esac])
- fi
-
- AC_SUBST(GUILE_SITE) 
- AC_SUBST(GUILE_INCLUDES)
- AC_SUBST(GUILE_LIBS)
-])
- 
-        
-
diff --git a/configure.ac b/configure.ac
index e545dfa..302f2df 100644
--- a/configure.ac
+++ b/configure.ac
@@ -19,3 +19,3 @@ AC_PREREQ(2.61)
 
-AC_REVISION(2015-01-06 14:33:57 gray)
+AC_REVISION(2015-01-07 14:56:15 gray)
 AC_INIT(ellinika, 1.99.99, [gray+ellinika@gnu.org.ua])
@@ -60,3 +60,12 @@ LIBS="$LIBS $ra_cv_lib_mysqlclient"
 AC_SUBST(GUILE_BINDIR)
+
 GUILE_BINDIR=`guile-config info bindir`
+if test -z "$GUILE_BINDIR"; then
+   GUILE_BINDIR=`guile-config info prefix`
+   if test -n "$GUILE_BINDIR"; then
+       GUILE_BINDIR="$GUILE_BINDIR/bin"
+   else
+       AC_MSG_ERROR([Cannot determine guile bin directory])
+   fi
+fi
 
diff --git a/data/db.struct b/data/db.struct
index 1b2f160..61e3d25 100644
--- a/data/db.struct
+++ b/data/db.struct
@@ -1,3 +1,3 @@
 -- This file is part of Ellinika
--- Copyright (C) 2004, 2005, 2007 Sergey Poznyakoff
+-- Copyright (C) 2004, 2005, 2007, 2015 Sergey Poznyakoff
 --
@@ -162,3 +162,3 @@ CREATE TABLE newsart(
 
-source dbverb.struct;
+source ./dbverb.struct;
  
diff --git a/data/pl/Makefile.am b/data/pl/Makefile.am
index 8707cf2..0965f9b 100644
--- a/data/pl/Makefile.am
+++ b/data/pl/Makefile.am
@@ -1,3 +1,3 @@
 # This file is part of Ellinika project.
-# Copyright (C) 2004, 2007 Sergey Poznyakoff
+# Copyright (C) 2004, 2007, 2015 Sergey Poznyakoff
 #
@@ -21,3 +21,3 @@ BASEXML=\
 dict:
-        $(top_builddir)/scm/dictrans $(BASEXML)
+        $(AM_V_GEN)LC_ALL=en_US.UTF-8 $(top_builddir)/scm/dictrans $(BASEXML)
 
diff --git a/data/ru/Makefile.am b/data/ru/Makefile.am
index 18d1441..b8eb7c7 100644
--- a/data/ru/Makefile.am
+++ b/data/ru/Makefile.am
@@ -1,3 +1,3 @@
 # This file is part of Ellinika project.
-# Copyright (C) 2004, 2007 Sergey Poznyakoff
+# Copyright (C) 2004, 2007, 2015 Sergey Poznyakoff
 #
@@ -50,3 +50,3 @@ EXTRA_DIST=\
 dict:
-        $(top_builddir)/scm/dictrans $(BASEXML)
+        $(AM_V_GEN)LC_ALL=en_US.UTF-8 $(top_builddir)/scm/dictrans $(BASEXML)
 
diff --git a/scm/dictrans.scm b/scm/dictrans.scm
index 2148929..9f1cfd5 100644
--- a/scm/dictrans.scm
+++ b/scm/dictrans.scm
@@ -4,3 +4,3 @@
 ;;;; This file is part of Ellinika
-;;;; Copyright (C) 2004, 2005, 2007, 2010 Sergey Poznyakoff
+;;;; Copyright (C) 2004, 2005, 2007, 2010, 2015 Sergey Poznyakoff
 ;;;;
@@ -95,2 +95,4 @@
 
+(setlocale LC_ALL "")
+
 (define compile-only #f)
diff --git a/scm/neatrans.scm b/scm/neatrans.scm
index 333453f..4f0fea3 100644
--- a/scm/neatrans.scm
+++ b/scm/neatrans.scm
@@ -42,2 +42,4 @@
 
+(setlocale LC_ALL "")
+
 (define compile-only #f)
diff --git a/scm/verbop.scm b/scm/verbop.scm
index 0ad0f90..b500213 100644
--- a/scm/verbop.scm
+++ b/scm/verbop.scm
@@ -6,3 +6,3 @@ exec ${GUILE-guile} -l $0 -c "(apply $main (command-line))" "$@"
 ;;;; This file is part of Ellinika
-;;;; Copyright (C) 2011 Sergey Poznyakoff
+;;;; Copyright (C) 2011, 2015 Sergey Poznyakoff
 ;;;;
@@ -33,2 +33,4 @@ exec ${GUILE-guile} -l $0 -c "(apply $main (command-line))" "$@"
 
+(setlocale LC_ALL "")
+
 (define cleanup-option #f)
diff --git a/src/cgi-bin/conj.scm4 b/src/cgi-bin/conj.scm4
index 83fb846..6a49c62 100644
--- a/src/cgi-bin/conj.scm4
+++ b/src/cgi-bin/conj.scm4
@@ -1,3 +1,3 @@
 ;;;; Greek Dictionary Web Engine
-;;;; Copyright (C) 2004, 2005, 2006, 2007, 2010, 2011 Sergey Poznyakoff
+;;;; Copyright (C) 2004, 2005, 2006, 2007, 2010, 2011, 2015 Sergey Poznyakoff
 ;;;; 
@@ -20,2 +20,3 @@
 
+(setlocale LC_ALL "")
 (use-modules ifelse(IFACE,[CGI],(www cgi),(guile-user))
@@ -63,3 +64,3 @@ ifelse(IF