--- loncom/interface/lonsupportreq.pm 2006/12/12 16:04:40 1.40 +++ loncom/interface/lonsupportreq.pm 2006/12/22 20:51:27 1.42 @@ -1,5 +1,5 @@ # -# $Id: lonsupportreq.pm,v 1.40 2006/12/12 16:04:40 raeburn Exp $ +# $Id: lonsupportreq.pm,v 1.42 2006/12/22 20:51:27 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -27,7 +27,6 @@ package Apache::lonsupportreq; use strict; -use lib qw(/home/httpd/lib/perl); use MIME::Types; use MIME::Lite; use CGI::Cookie(); @@ -48,6 +47,10 @@ sub handler { if ($r->header_only) { return OK; } + if ($r->uri eq '/adm/helpdesk') { + &Apache::lonlocal::get_language_handle($r); + } + &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['origurl','function']); if ($r->uri eq '/adm/helpdesk') { &Apache::lonacc::get_posted_cgi($r); @@ -741,7 +744,7 @@ $lt{'name'}: $env{'form.username'} $lt{'email'}: $env{'form.email'} $lt{'unme'}: $env{'form.uname'} - $env{'form.udom'} $lt{'tel'}: $env{'form.phone'} -$lt{'crsi'}: env{'form.title'} - $coursecode - $lt{'secn'}: $env{'form.section'} +$lt{'crsi'}: $env{'form.title'} - $coursecode - $lt{'secn'}: $env{'form.section'} $lt{'subj'}: $env{'form.subject'} $lt{'desc'}: $env{'form.description'} URL: $env{'form.sourceurl'}