Fix dictionary-update-receiver to cope with new cgi_get_caller

diff --git a/yarrg/Commods.pm b/yarrg/Commods.pm
index 97cba0460f975b3a693c72c76be7449ea747eb7a..b670f58a0c5245c12a9f0d14082ae8c437a583d5 100644 (file)
--- a/yarrg/Commods.pm
+++ b/yarrg/Commods.pm
@@ -40,7 +40,7 @@ BEGIN {
                      &pipethrough_prep &pipethrough_run
                      &pipethrough_run_along &pipethrough_run_finish
                      &pipethrough_run_gzip
                      &pipethrough_prep &pipethrough_run
                      &pipethrough_run_along &pipethrough_run_finish
                      &pipethrough_run_gzip

-                     &cgipostform &yarrgpostform);
+                     &cgipostform &yarrgpostform &cgi_get_caller);

     %EXPORT_TAGS = ( );
 
     @EXPORT_OK   = qw();
     %EXPORT_TAGS = ( );
 
     @EXPORT_OK   = qw();

diff --git a/yarrg/dictionary-update-receiver b/yarrg/dictionary-update-receiver
index cd26a2663256e98a42b3812eba70597c5b661f4d..352b9bbbfd09d77fb1f405be2a53b199d7627615 100755 (executable)
--- a/yarrg/dictionary-update-receiver
+++ b/yarrg/dictionary-update-receiver
@@ -41,6 +41,8 @@ use CGI qw/:standard -private_tempfiles/;
 use IO::Pipe;
 use IO::Handle;
 
 use IO::Pipe;
 use IO::Handle;
 

+use Commods;
+

 my $aadepth=2;
 
 #---------- pixmaps ----------
 my $aadepth=2;
 
 #---------- pixmaps ----------