File: caller-stack.html

package info (click to toggle)
libhtml-mason-perl 1%3A1.35-3
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 1,988 kB
  • ctags: 1,477
  • sloc: perl: 16,974; sh: 185; makefile: 8
file content (13 lines) | stat: -rw-r--r-- 266 bytes parent folder | download | duplicates (11) 
1
2
3
4
5
6
7
8
9
10
11
12
13
 
<p> Called from <% $m->callers(1)->path %> </p>

<& .content &>

<%def .content>
% for ($m->callers) {
<b><% $_->title |h%></b> <% "$_" |h %> <% $_->can('owner') ? "owner=".$_->owner->name : "no_owner" |h%> <br>
% }
</%def>

<%attr>
title => "Caller stack"
</%attr>