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

(-)a/C4/Auth.pm (-9 / +5 lines)
Lines 19-24 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;
Lines 1065-1078 sub checkauth { Link Here
1065
        LibraryName => C4::Context->preference("LibraryName"),
1066
        LibraryName => C4::Context->preference("LibraryName"),
1066
    );
1067
    );
1067
    $template->param( %info );
1068
    $template->param( %info );
1068
#    $cookie = $query->cookie(CGISESSID => $session->id
1069
1069
#   );
1070
    require C4::Output;
1070
    print $query->header(
1071
    C4::Output::output_html_with_http_headers( $query, $cookie,
1071
        -type   => 'text/html',
1072
                                               $template->output);
1072
        -charset => 'utf-8',
1073
        -cookie => $cookie
1074
      ),
1075
      $template->output;
1076
    safe_exit;
1073
    safe_exit;
1077
}
1074
}
1078
1075
1079
- 

Return to bug 10074