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

(-)a/C4/MarcModificationTemplates.pm (-14 / +13 lines)
Lines 1-29 Link Here
1
package C4::MarcModificationTemplates;
1
package C4::MarcModificationTemplates;
2
2
3
# Copyright 2010 Kyle M Hall <kyle.m.hall@gmail.com>
4
#
5
# This file is part of Koha.
3
# This file is part of Koha.
6
#
4
#
7
# Koha is free software; you can redistribute it and/or modify it under the
5
# Copyright 2010 Kyle M Hall <kyle.m.hall@gmail.com>
8
# terms of the GNU General Public License as published by the Free Software
6
#
9
# Foundation; either version 2 of the License, or (at your option) any later
7
# Koha is free software; you can redistribute it and/or modify it
10
# version.
8
# under the terms of the GNU General Public License as published by
9
# the Free Software Foundation; either version 3 of the License, or
10
# (at your option) any later version.
11
#
11
#
12
# Koha is distributed in the hope that it will be useful, but WITHOUT ANY
12
# Koha is distributed in the hope that it will be useful, but
13
# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
13
# WITHOUT ANY WARRANTY; without even the implied warranty of
14
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
14
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15
# GNU General Public License for more details.
15
#
16
#
16
# You should have received a copy of the GNU General Public License along
17
# You should have received a copy of the GNU General Public License
17
# with Koha; if not, write to the Free Software Foundation, Inc.,
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
19
19
20
## NOTE:
20
## NOTE:
21
## Parts of this module are used from cgi scripts that are detached from apache before
21
## Parts of this module are used from cgi scripts that are detached from apache before
22
## execution. For this reason, the C4::Koha::Log function has been used to capture
22
## execution. For this reason, the C4::Koha::Log function has been used to capture
23
## output for debugging purposes.
23
## output for debugging purposes.
24
24
25
use strict;
25
use Modern::Perl;
26
use warnings;
27
26
28
use DateTime;
27
use DateTime;
29
28
(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/tools/marc_modification_templates.tt (-4 / +4 lines)
Lines 290-308 function setSelectByValue( selectId, value ) { Link Here
290
                            <tr>
290
                            <tr>
291
                                <td style="white-space:nowrap;">
291
                                <td style="white-space:nowrap;">
292
                                    <a title="Move Action Up" href="marc_modification_templates.pl?op=move_action&amp;where=up&amp;template_id=[% ActionsLoo.template_id %]&amp;mmta_id=[% ActionsLoo.mmta_id %]">
292
                                    <a title="Move Action Up" href="marc_modification_templates.pl?op=move_action&amp;where=up&amp;template_id=[% ActionsLoo.template_id %]&amp;mmta_id=[% ActionsLoo.mmta_id %]">
293
                                    <img src="/intranet-tmpl/[% theme %]/img/go-up.png" border="0" alt="Go up" />
293
                                    <img src="[% interface %]/[% theme %]/img/go-up.png" border="0" alt="Go up" />
294
                                        </a>
294
                                        </a>
295
295
296
                                <a title="Move Action To Top" href="marc_modification_templates.pl?op=move_action&amp;where=top&amp;template_id=[% ActionsLoo.template_id %]&amp;mmta_id=[% ActionsLoo.mmta_id %]">
296
                                <a title="Move Action To Top" href="marc_modification_templates.pl?op=move_action&amp;where=top&amp;template_id=[% ActionsLoo.template_id %]&amp;mmta_id=[% ActionsLoo.mmta_id %]">
297
                                    <img src="/intranet-tmpl/[% theme %]/img/go-top.png" border="0" alt="Go top" />
297
                                    <img src="[% interface %]/[% theme %]/img/go-top.png" border="0" alt="Go top" />
298
                                        </a>
298
                                        </a>
299
299
300
                                        <a title="Move Action To Bottom" href="marc_modification_templates.pl?op=move_action&amp;where=bottom&amp;template_id=[% ActionsLoo.template_id %]&amp;mmta_id=[% ActionsLoo.mmta_id %]">
300
                                        <a title="Move Action To Bottom" href="marc_modification_templates.pl?op=move_action&amp;where=bottom&amp;template_id=[% ActionsLoo.template_id %]&amp;mmta_id=[% ActionsLoo.mmta_id %]">
301
                                    <img src="/intranet-tmpl/[% theme %]/img/go-bottom.png" border="0" alt="Go bottom" />
301
                                    <img src="[% interface %]/[% theme %]/img/go-bottom.png" border="0" alt="Go bottom" />
302
                                        </a>
302
                                        </a>
303
303
304
                                        <a title="Move Action Down" href="marc_modification_templates.pl?op=move_action&amp;where=down&amp;template_id=[% ActionsLoo.template_id %]&amp;mmta_id=[% ActionsLoo.mmta_id %]">
304
                                        <a title="Move Action Down" href="marc_modification_templates.pl?op=move_action&amp;where=down&amp;template_id=[% ActionsLoo.template_id %]&amp;mmta_id=[% ActionsLoo.mmta_id %]">
305
                                    <img src="/intranet-tmpl/[% theme %]/img/go-down.png" border="0" alt="Go down" />
305
                                    <img src="/[% interface %]/[% theme %]/img/go-down.png" border="0" alt="Go down" />
306
                                        </a>
306
                                        </a>
307
                                </td>
307
                                </td>
308
308
(-)a/tools/marc_modification_templates.pl (-15 / +13 lines)
Lines 1-23 Link Here
1
#!/usr/bin/perl
1
#!/usr/bin/perl
2
# Copyright 2010 Kyle M Hall <kyle.m.hall@gmail.com>
3
#
4
# This file is part of Koha.
2
# This file is part of Koha.
5
#
3
#
6
# Koha is free software; you can redistribute it and/or modify it under the
4
# Copyright 2010 Kyle M Hall <kyle.m.hall@gmail.com>
7
# terms of the GNU General Public License as published by the Free Software
5
#
8
# Foundation; either version 2 of the License, or (at your option) any later
6
# Koha is free software; you can redistribute it and/or modify it
9
# version.
7
# under the terms of the GNU General Public License as published by
8
# the Free Software Foundation; either version 3 of the License, or
9
# (at your option) any later version.
10
#
10
#
11
# Koha is distributed in the hope that it will be useful, but WITHOUT ANY
11
# Koha is distributed in the hope that it will be useful, but
12
# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
12
# WITHOUT ANY WARRANTY; without even the implied warranty of
13
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
13
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14
# GNU General Public License for more details.
14
#
15
#
15
# You should have received a copy of the GNU General Public License along
16
# You should have received a copy of the GNU General Public License
16
# with Koha; if not, write to the Free Software Foundation, Inc.,
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
18
18
19
use strict;
19
use Modern::Perl;
20
use warnings;
21
20
22
use CGI;
21
use CGI;
23
22
24
- 

Return to bug 8015