From e70385696a63aef04938fca71826ee6719fc8ff8 Mon Sep 17 00:00:00 2001 From: rangi Date: Fri, 16 Jul 2004 00:39:15 +0000 Subject: [PATCH] Little script that takes a language as an input, and sets a cookie --- changelanguage.pl | 10 ++++++++++ 1 file changed, 10 insertions(+) create mode 100755 changelanguage.pl diff --git a/changelanguage.pl b/changelanguage.pl new file mode 100755 index 0000000000..ad616a71b7 --- /dev/null +++ b/changelanguage.pl @@ -0,0 +1,10 @@ +#!/usr/bin/perl + +use C4::Output; +use CGI; + +my $query=new CGI; +my $language=$query->param('language'); +my $url=$query->referer(); + +setlanguagecookie($query,$language,$url); -- 2.39.5