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

(-)a/tools/letter.pl (-5 / +4 lines)
Lines 85-101 sub protected_letters { Link Here
85
    return { map { $_->[0] => 1 } @{$codes} };
85
    return { map { $_->[0] => 1 } @{$codes} };
86
}
86
}
87
87
88
my $input       = new CGI;
88
our $input       = new CGI;
89
my $searchfield = $input->param('searchfield');
89
my $searchfield = $input->param('searchfield');
90
my $script_name = '/cgi-bin/koha/tools/letter.pl';
90
my $script_name = '/cgi-bin/koha/tools/letter.pl';
91
my $branchcode  = $input->param('branchcode');
91
our $branchcode  = $input->param('branchcode');
92
my $code        = $input->param('code');
92
my $code        = $input->param('code');
93
my $module      = $input->param('module');
93
my $module      = $input->param('module');
94
my $content     = $input->param('content');
94
my $content     = $input->param('content');
95
my $op          = $input->param('op') || '';
95
my $op          = $input->param('op') || '';
96
my $dbh = C4::Context->dbh;
96
my $dbh = C4::Context->dbh;
97
97
98
my ( $template, $borrowernumber, $cookie, $staffflags ) = get_template_and_user(
98
our ( $template, $borrowernumber, $cookie, $staffflags ) = get_template_and_user(
99
    {
99
    {
100
        template_name   => 'tools/letter.tmpl',
100
        template_name   => 'tools/letter.tmpl',
101
        query           => $input,
101
        query           => $input,
Lines 106-112 my ( $template, $borrowernumber, $cookie, $staffflags ) = get_template_and_user( Link Here
106
    }
106
    }
107
);
107
);
108
108
109
my $my_branch = C4::Context->preference("IndependantBranches") && !$staffflags->{'superlibrarian'}
109
our $my_branch = C4::Context->preference("IndependantBranches") && !$staffflags->{'superlibrarian'}
110
  ?  C4::Context->userenv()->{'branch'}
110
  ?  C4::Context->userenv()->{'branch'}
111
  : undef;
111
  : undef;
112
# we show only the TMPL_VAR names $op
112
# we show only the TMPL_VAR names $op
113
- 

Return to bug 7779