| Filename | /home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt |
| Statements | Executed 104 statements in 492µs |
| Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
|---|---|---|---|---|---|
| 1 | 1 | 1 | 322µs | 94.1ms | Template::Document::__ANON__[:203] |
| Line | State ments |
Time on line |
Calls | Time in subs |
Code |
|---|---|---|---|---|---|
| 1 | # spent 94.1ms (322µs+93.8) within Template::Document::__ANON__[/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt:203] which was called:
# once (322µs+93.8ms) by Template::Document::process at line 163 of Template/Document.pm | ||||
| 2 | 3 | 12µs | 3 | 9.92ms | $stash->set('Koha', # spent 9.83ms making 1 call to Template::Context::include
# spent 84µs making 1 call to Template::Context::plugin
# spent 4µs making 1 call to Template::Stash::XS::set |
| 3 | 1 | 2µs | $context->plugin('Koha')); | ||
| 4 | 2 | 10µs | 1 | 4µs | $output .= "\n"; # spent 4µs making 1 call to Template::Stash::XS::get |
| 5 | 2 | 14µs | 1 | 32.7ms | #line 2 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" # spent 32.7ms making 1 call to Template::Context::include |
| 6 | 1 | 1µs | $output .= $context->include('doc-head-open.inc'); | ||
| 7 | 1 | 600ns | $output .= "\n<title>Koha staff client</title>\n<link rel=\"stylesheet\" type=\"text/css\" href=\""; | ||
| 8 | #line 4 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 9 | $output .= $stash->get('themelang'); | ||||
| 10 | 1 | 6µs | 1 | 13.3ms | $output .= "/css/mainpage.css\" />\n"; # spent 13.3ms making 1 call to Template::Context::include |
| 11 | 2 | 14µs | 1 | 11.7ms | #line 5 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" # spent 11.7ms making 1 call to Template::Context::include |
| 12 | 1 | 2µs | $output .= $context->include('doc-head-close.inc'); | ||
| 13 | $output .= "\n<style type=\"text/css\"> </style>\n\n</head>\n<body id=\"main_intranet-main\" class=\"main\">\n"; | ||||
| 14 | #line 10 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 15 | $output .= $context->include('header.inc'); | ||||
| 16 | $output .= "\n"; | ||||
| 17 | #line 11 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 18 | $output .= $context->include('home-search.inc'); | ||||
| 19 | $output .= "\n\n<div id=\"breadcrumbs\" >Home</div>\n\n\n<div id=\"doc3\" class=\"yui-t3\">\n <div id=\"bd\" role=\"main\">\n <div id=\"yui-main\">\n <div class=\"yui-b\"><div class=\"yui-g\">\n "; | ||||
| 20 | #line 25 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 21 | if ($stash->get('adminWarning')) { | ||||
| 22 | $output .= "\n <div id=\"adminwarning\" class=\"dialog alert\">\n <p><strong>Warning:</strong> You're logged in with the database administrator account. This is a bad idea, and you are likely to encounter problems.</p>\n <p>You should <a href=\"/cgi-bin/koha/members/members-home.pl\">create a patron</a> to use when administering Koha and give it superlibrarian permissions.</p>\n </div>\n "; | ||||
| 23 | } | ||||
| 24 | |||||
| 25 | 1 | 12µs | 2 | 15µs | $output .= "\n <div class=\"yui-u first\">\n\n <div id=\"area-list-left\">\n <ul class=\"biglinks-list\">\n "; # spent 12µs making 1 call to Template::Stash::XS::get
# spent 3µs making 1 call to Template::Stash::undefined |
| 26 | #line 34 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 27 | if (($stash->get('CAN_user_circulate'))) { | ||||
| 28 | $output .= "\n <li>\n <a class=\"icon_general icon_circulation\" href=\"/cgi-bin/koha/circ/circulation-home.pl\">Circulation</a>\n </li>\n "; | ||||
| 29 | 1 | 1µs | } | ||
| 30 | |||||
| 31 | $output .= "\n\n "; | ||||
| 32 | #line 40 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 33 | if (($stash->get('CAN_user_borrowers'))) { | ||||
| 34 | 1 | 8µs | 1 | 3µs | $output .= "\n <li>\n <a class=\"icon_general icon_patrons\" href=\"/cgi-bin/koha/members/members-home.pl\">Patrons</a>\n </li>\n "; # spent 3µs making 1 call to Template::Stash::XS::get |
| 35 | } | ||||
| 36 | |||||
| 37 | $output .= "\n\n "; | ||||
| 38 | 1 | 600ns | #line 46 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||
| 39 | if (($stash->get('CAN_user_catalogue'))) { | ||||
| 40 | 1 | 8µs | 1 | 3µs | $output .= "\n <li>\n <a class=\"icon_general icon_search\" href=\"/cgi-bin/koha/catalogue/search.pl\">Advanced search</a>\n </li>\n "; # spent 3µs making 1 call to Template::Stash::XS::get |
| 41 | } | ||||
| 42 | |||||
| 43 | $output .= "\n\n <li>\n <a class=\"icon_general icon_lists\" href=\"/cgi-bin/koha/virtualshelves/shelves.pl\">Lists</a>\n </li>\n\n "; | ||||
| 44 | 1 | 400ns | #line 56 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||
| 45 | if (($stash->get('UseCourseReserves'))) { | ||||
| 46 | 1 | 7µs | 1 | 3µs | $output .= "\n <li>\n <a class=\"icon_general icon_course_reserves\" href=\"/cgi-bin/koha/course_reserves/course-reserves.pl\">Course reserves</a>\n </li>\n "; # spent 3µs making 1 call to Template::Stash::XS::get |
| 47 | } | ||||
| 48 | |||||
| 49 | $output .= "\n\n "; | ||||
| 50 | 1 | 800ns | #line 62 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||
| 51 | if (($stash->get('CAN_user_editcatalogue_edit_catalogue') || $stash->get('CAN_user_editcatalogue_edit_items'))) { | ||||
| 52 | $output .= "\n <li>\n <a class=\"icon_general icon_cataloging\" href=\"/cgi-bin/koha/cataloguing/addbooks.pl\">Cataloging</a>\n </li>\n "; | ||||
| 53 | } | ||||
| 54 | |||||
| 55 | $output .= "\n <li>\n <a class=\"icon_general icon_authorities\" href=\"/cgi-bin/koha/authorities/authorities-home.pl\">Authorities</a>\n </li>\n </ul>\n </div><!-- /area-list-left -->\n </div><!-- /yui-u first -->\n <div class=\"yui-u\">\n <div id=\"area-list-right\">\n <ul class=\"biglinks-list\">\n "; | ||||
| 56 | 1 | 5µs | 1 | 2µs | #line 77 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" # spent 2µs making 1 call to Template::Stash::XS::get |
| 57 | if (($stash->get('CAN_user_serials'))) { | ||||
| 58 | $output .= "\n <li>\n <a class=\"icon_general icon_serials\" href=\"/cgi-bin/koha/serials/serials-home.pl\">Serials</a>\n <span class=\"biglink\"></span>\n </li>\n "; | ||||
| 59 | } | ||||
| 60 | 1 | 600ns | |||
| 61 | $output .= "\n\n "; | ||||
| 62 | 1 | 7µs | 1 | 2µs | #line 84 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" # spent 2µs making 1 call to Template::Stash::XS::get |
| 63 | if (($stash->get('CAN_user_acquisition'))) { | ||||
| 64 | $output .= "\n <li>\n <a class=\"icon_general icon_acquisitions\" href=\"/cgi-bin/koha/acqui/acqui-home.pl\">Acquisitions</a>\n <span class=\"biglink\"></span>\n </li>\n "; | ||||
| 65 | } | ||||
| 66 | 1 | 1µs | |||
| 67 | $output .= "\n\n "; | ||||
| 68 | #line 90 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 69 | if (($stash->get('CAN_user_reports'))) { | ||||
| 70 | $output .= "\n <li>\n <a class=\"icon_general icon_reports\" href=\"/cgi-bin/koha/reports/reports-home.pl\">Reports</a>\n </li>\n "; | ||||
| 71 | } | ||||
| 72 | |||||
| 73 | $output .= "\n\n\n "; | ||||
| 74 | #line 97 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 75 | if (($stash->get('CAN_user_tools'))) { | ||||
| 76 | $output .= "\n <li>\n <a class=\"icon_general icon_tools\" href=\"/cgi-bin/koha/tools/tools-home.pl\">Tools</a>\n </li>\n "; | ||||
| 77 | 1 | 6µs | 1 | 2µs | } # spent 2µs making 1 call to Template::Stash::XS::get |
| 78 | |||||
| 79 | $output .= "\n\n "; | ||||
| 80 | #line 103 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 81 | 1 | 700ns | if (($stash->get('CAN_user_parameters'))) { | ||
| 82 | $output .= "\n <li>\n <a class=\"icon_general icon_administration\" href=\"/cgi-bin/koha/admin/admin-home.pl\">Koha administration</a>\n </li>\n "; | ||||
| 83 | } | ||||
| 84 | 1 | 6µs | 1 | 2µs | # spent 2µs making 1 call to Template::Stash::XS::get |
| 85 | $output .= "\n <li>\n <a class=\"icon_general icon_koha\" href=\"/cgi-bin/koha/about.pl\">About Koha</a>\n </li>\n </ul>\n </div><!-- /area-list-right -->\n </div><!-- /yui-u -->\n</div><!-- /yui-g -->\n<div class=\"yui-g\">\n "; | ||||
| 86 | #line 158 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 87 | if ((($stash->get('CAN_user_tools_moderate_comments') && $stash->get('pendingcomments')) || ($stash->get('CAN_user_tools_moderate_tags') && $stash->get('pendingtags')) || ($stash->get('CAN_user_borrowers') && $stash->get('pending_borrower_modifications')) || ($stash->get('CAN_user_acquisition') && $stash->get('pendingsuggestions')) || ($stash->get('CAN_user_borrowers') && $stash->get('pending_discharge_requests')))) { | ||||
| 88 | 1 | 500ns | $output .= "\n <div id=\"area-pending\">\n "; | ||
| 89 | #line 125 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 90 | 1 | 7µs | 1 | 3µs | if (($stash->get('CAN_user_acquisition') && $stash->get('pendingsuggestions'))) { # spent 3µs making 1 call to Template::Stash::XS::get |
| 91 | $output .= "\n <div class=\"pending-info\" id=\"suggestions_pending\">\n\n <a href=\"/cgi-bin/koha/suggestion/suggestion.pl#ASKED\">Suggestions pending approval</a>:\n <span class=\"pending-number-link\">"; | ||||
| 92 | #line 123 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 93 | $output .= $stash->get('pendingsuggestions'); | ||||
| 94 | 1 | 600ns | $output .= "</span>\n </div>\n "; | ||
| 95 | } | ||||
| 96 | |||||
| 97 | 1 | 6µs | 1 | 2µs | $output .= "\n\n "; # spent 2µs making 1 call to Template::Stash::XS::get |
| 98 | #line 132 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 99 | if (($stash->get('CAN_user_tools_moderate_comments') && $stash->get('pendingcomments'))) { | ||||
| 100 | $output .= "\n <div class=\"pending-info\" id=\"comments_pending\">\n <a href=\"/cgi-bin/koha/reviews/reviewswaiting.pl\">Comments pending approval</a>:\n <span class=\"pending-number-link\">"; | ||||
| 101 | 1 | 600ns | #line 130 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||
| 102 | $output .= $stash->get('pendingcomments'); | ||||
| 103 | 1 | 6µs | 1 | 2µs | $output .= "</span>\n </div>\n "; # spent 2µs making 1 call to Template::Stash::XS::get |
| 104 | } | ||||
| 105 | |||||
| 106 | $output .= "\n\n "; | ||||
| 107 | 1 | 3µs | #line 139 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||
| 108 | if (($stash->get('CAN_user_tools_moderate_tags') && $stash->get('pendingtags'))) { | ||||
| 109 | $output .= "\n <div class=\"pending-info\" id=\"tags_pending\">\n <a href=\"/cgi-bin/koha/tags/review.pl\">Tags pending approval</a>:\n <span class=\"pending-number-link\">"; | ||||
| 110 | #line 137 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 111 | $output .= $stash->get('pendingtags'); | ||||
| 112 | $output .= "</span>\n </div>\n "; | ||||
| 113 | } | ||||
| 114 | |||||
| 115 | $output .= "\n\n\n "; | ||||
| 116 | #line 147 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 117 | if (($stash->get('CAN_user_borrowers') && $stash->get('pending_borrower_modifications'))) { | ||||
| 118 | $output .= "\n <div class=\"pending-info\" id=\"patron_updates_pending\">\n <a href=\"/cgi-bin/koha/members/members-update.pl\">Patrons requesting modifications</a>:\n <span class=\"pending-number-link\">"; | ||||
| 119 | #line 145 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 120 | $output .= $stash->get('pending_borrower_modifications'); | ||||
| 121 | $output .= "</span>\n </div>\n "; | ||||
| 122 | } | ||||
| 123 | |||||
| 124 | $output .= "\n\n "; | ||||
| 125 | #line 154 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 126 | if ($stash->get('CAN_user_borrowers') && $stash->get('pending_discharge_requests')) { | ||||
| 127 | $output .= "\n <div class=\"pending-info\" id=\"patron_discharges_pending\">\n <a href=\"/cgi-bin/koha/members/discharges.pl\">Discharge requests pending</a>:\n <span class=\"pending-number-link\">"; | ||||
| 128 | #line 152 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 129 | $output .= $stash->get('pending_discharge_requests'); | ||||
| 130 | $output .= "</span>\n </div>\n "; | ||||
| 131 | } | ||||
| 132 | |||||
| 133 | $output .= "\n\n </div>\n\n "; | ||||
| 134 | } | ||||
| 135 | |||||
| 136 | $output .= "\n\n</div>\n "; | ||||
| 137 | #line 167 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 138 | if (($stash->get('IntranetmainUserblock'))) { | ||||
| 139 | $output .= "\n <div class=\"yui-g\" id=\"area-userblock\">\n <div class=\"user-info\">\n "; | ||||
| 140 | #line 164 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 141 | $output .= $stash->get('IntranetmainUserblock'); | ||||
| 142 | $output .= "\n </div>\n </div>\n "; | ||||
| 143 | } | ||||
| 144 | |||||
| 145 | $output .= "\n</div>\n </div>\n <div class=\"yui-b\"><!-- YOUR NAVIGATION GOES HERE -->\n "; | ||||
| 146 | #line 188 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 147 | if (($stash->get('koha_news_count'))) { | ||||
| 148 | $output .= "\n <div id=\"area-news\">\n <h3><span=\"news_title\">News</span></h3>\n "; | ||||
| 149 | #line 174 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 150 | $stash->set('newsdisp', $stash->get(['Koha', 0, 'Preference', [ 'NewsAuthorDisplay' ]])); | ||||
| 151 | $output .= "\n "; | ||||
| 152 | #line 186 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 153 | |||||
| 154 | # FOREACH | ||||
| 155 | do { | ||||
| 156 | my ($_tt_value, $_tt_error, $_tt_oldloop); | ||||
| 157 | my $_tt_list = $stash->get('koha_news'); | ||||
| 158 | 1 | 42µs | 10 | 23µs | # spent 23µs making 10 calls to Template::Stash::XS::get, avg 2µs/call |
| 159 | 1 | 1µs | unless (UNIVERSAL::isa($_tt_list, 'Template::Iterator')) { | ||
| 160 | $_tt_list = Template::Config->iterator($_tt_list) | ||||
| 161 | || die $Template::Config::ERROR, "\n"; | ||||
| 162 | } | ||||
| 163 | |||||
| 164 | ($_tt_value, $_tt_error) = $_tt_list->get_first(); | ||||
| 165 | eval { $_tt_oldloop = $stash->get('loop') }; | ||||
| 166 | $stash->set('loop', $_tt_list); | ||||
| 167 | 1 | 6µs | 1 | 2µs | eval { # spent 2µs making 1 call to Template::Stash::XS::get |
| 168 | 1 | 1µs | FOR1: while (! $_tt_error) { | ||
| 169 | $stash->{'koha_new'} = $_tt_value; | ||||
| 170 | $output .= "\n <div class=\"newsitem\" id=\"news"; | ||||
| 171 | #line 176 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 172 | $output .= $stash->get(['koha_new', 0, 'idnew', 0]); | ||||
| 173 | $output .= "\"><h4>"; | ||||
| 174 | 1 | 48µs | 3 | 5.88ms | #line 176 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" # spent 2.95ms making 1 call to Template::Stash::XS::get
# spent 2.92ms making 1 call to Koha::Template::Plugin::Koha::Preference
# spent 12µs making 1 call to Template::Stash::XS::set |
| 175 | 1 | 1µs | $output .= $stash->get(['koha_new', 0, 'title', 0]); | ||
| 176 | 4 | 32µs | 4 | 17µs | $output .= "</h4>\n <p>"; # spent 17µs making 4 calls to Template::Stash::XS::get, avg 4µs/call |
| 177 | 6 | 18µs | 2 | 8µs | #line 177 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" # spent 8µs making 2 calls to Template::Stash::XS::get, avg 4µs/call |
| 178 | 6 | 34µs | 6 | 17µs | $output .= $stash->get(['koha_new', 0, 'new', 0]); # spent 17µs making 6 calls to Template::Stash::XS::get, avg 3µs/call |
| 179 | $output .= "</p>\n <p class=\"newsfooter\"> Posted on "; | ||||
| 180 | 2 | 15µs | 2 | 7µs | #line 178 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" # spent 7µs making 2 calls to Template::Stash::XS::get, avg 4µs/call |
| 181 | 4 | 15µs | 2 | 7µs | $output .= $stash->get(['koha_new', 0, 'newdate', 0]); # spent 7µs making 2 calls to Template::Stash::XS::get, avg 4µs/call |
| 182 | 4 | 3µs | #line 178 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||
| 183 | 2 | 10µs | 2 | 4µs | if ((($stash->get('newsdisp') eq 'staff' || $stash->get('newsdisp') eq 'both') && $stash->get(['koha_new', 0, 'borrowernumber', 0]))) { # spent 4µs making 2 calls to Template::Stash::XS::get, avg 2µs/call |
| 184 | 2 | 1µs | $output .= " by <span class=\"newsauthor_title\">"; | ||
| 185 | 2 | 900ns | #line 178 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||
| 186 | 2 | 4µs | 2 | 7µs | $output .= $stash->get(['koha_new', 0, 'author_title', 0]); # spent 7µs making 2 calls to Template::Iterator::get_next, avg 4µs/call |
| 187 | $output .= " </span>"; | ||||
| 188 | 3 | 8µs | 1 | 3µs | #line 178 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" # spent 3µs making 1 call to Template::Stash::XS::get |
| 189 | 3 | 8µs | 1 | 3µs | $output .= $stash->get(['koha_new', 0, 'author_firstname', 0]); # spent 3µs making 1 call to Template::Stash::XS::set |
| 190 | 2 | 8µs | 1 | 3µs | $output .= " "; # spent 3µs making 1 call to Template::Stash::XS::get |
| 191 | 1 | 1µs | #line 178 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||
| 192 | 2 | 11µs | 1 | 1µs | $output .= $stash->get(['koha_new', 0, 'author_surname', 0]); # spent 1µs making 1 call to UNIVERSAL::isa |
| 193 | 1 | 10µs | 1 | 1.57ms | $output .= "<br />"; # spent 1.57ms making 1 call to Template::Config::iterator |
| 194 | 1 | 4µs | 1 | 21.5ms | } # spent 21.5ms making 1 call to Template::Context::include |
| 195 | 2 | 2µs | |||
| 196 | $output .= "\n "; | ||||
| 197 | 2 | 2µs | 1 | 8µs | #line 183 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" # spent 8µs making 1 call to Template::Iterator::get_first |
| 198 | 3 | 14µs | 2 | 20µs | if (($stash->get('CAN_user_tools'))) { # spent 16µs making 1 call to Template::Stash::XS::get
# spent 4µs making 1 call to Template::Stash::undefined |
| 199 | 1 | 10µs | 1 | 6µs | $output .= "\n <a href=\"/cgi-bin/koha/tools/koha-news.pl?op=add_form&id="; # spent 6µs making 1 call to Template::Stash::XS::set |
| 200 | #line 180 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 201 | 1 | 600ns | $output .= $stash->get(['koha_new', 0, 'idnew', 0]); | ||
| 202 | 3 | 17µs | $output .= "\">Edit</a>\n | <a href=\"/cgi-bin/koha/tools/koha-news.pl?op=del&ids="; | ||
| 203 | 2 | 2µs | #line 181 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||
| 204 | 1 | 12µs | $output .= $stash->get(['koha_new', 0, 'idnew', 0]); | ||
| 205 | $output .= "\">Delete</a>\n | <a href=\"/cgi-bin/koha/tools/koha-news.pl?op=add_form\">New</a>\n "; | ||||
| 206 | } | ||||
| 207 | |||||
| 208 | $output .= "\n </p>\n </div>\n ";; | ||||
| 209 | ($_tt_value, $_tt_error) = $_tt_list->get_next(); | ||||
| 210 | } | ||||
| 211 | }; | ||||
| 212 | $stash->set('loop', $_tt_oldloop); | ||||
| 213 | die $@ if $@; | ||||
| 214 | $_tt_error = 0 if $_tt_error && $_tt_error eq Template::Constants::STATUS_DONE; | ||||
| 215 | die $_tt_error if $_tt_error; | ||||
| 216 | }; | ||||
| 217 | |||||
| 218 | $output .= "\n </div><!-- /koha-news -->\n "; | ||||
| 219 | } | ||||
| 220 | |||||
| 221 | $output .= "\n </div>\n </div>\n</div>\n\n<!-- the main div is closed in intranet-bottom.inc -->\n"; | ||||
| 222 | #line 194 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt" | ||||
| 223 | $output .= $context->include('intranet-bottom.inc'); | ||||
| 224 | $output .= "\n"; | ||||
| 225 | } }; | ||||
| 226 | if ($@) { | ||||
| 227 | $_tt_error = $context->catch($@, \$output); | ||||
| 228 | die $_tt_error unless $_tt_error->type eq 'return'; | ||||
| 229 | } | ||||
| 230 | |||||
| 231 | return $output; | ||||
| 232 | } | ||||
| 233 |