View | Details | Raw Unified | Return to bug 10074
Collapse All | Expand All

(-)a/C4/Auth.pm (-9 / +4 lines)
Lines 19-30 package C4::Auth; Link Here
19
19
20
use strict;
20
use strict;
21
use warnings;
21
use warnings;
22
22
use Digest::MD5 qw(md5_base64);
23
use Digest::MD5 qw(md5_base64);
23
use Storable qw(thaw freeze);
24
use Storable qw(thaw freeze);
24
use URI::Escape;
25
use URI::Escape;
25
use CGI::Session;
26
use CGI::Session;
26
27
27
require Exporter;
28
require Exporter;
29
use C4::Output;
28
use C4::Context;
30
use C4::Context;
29
use C4::Templates;    # to get the template
31
use C4::Templates;    # to get the template
30
use C4::Branch; # GetBranches
32
use C4::Branch; # GetBranches
Lines 1065-1078 sub checkauth { Link Here
1065
        LibraryName => C4::Context->preference("LibraryName"),
1067
        LibraryName => C4::Context->preference("LibraryName"),
1066
    );
1068
    );
1067
    $template->param( %info );
1069
    $template->param( %info );
1068
#    $cookie = $query->cookie(CGISESSID => $session->id
1070
1069
#   );
1071
    output_html_with_http_headers $query, $cookie, $template->output;
1070
    print $query->header(
1071
        -type   => 'text/html',
1072
        -charset => 'utf-8',
1073
        -cookie => $cookie
1074
      ),
1075
      $template->output;
1076
    safe_exit;
1072
    safe_exit;
1077
}
1073
}
1078
1074
1079
- 

Return to bug 10074