The Perl and Raku Conference 2025: Greenville, South Carolina - June 27-29 Learn more

JSWARTZ / Poet-0.16 / eg / blog / comps / Base.mc 

            

              
1
2
3
4
5
6
7
8
9
10
11
12
13
14

              
<%augment wrap>
  <html>
    <head>
      <link rel="stylesheet" href="/static/css/mwiki.css">
      <title>My Blog</title>
    </head>
    <body>
% if (my $message = delete($m->session->{message})) {
      <div class="message"><% $message %></div>
% }      
      <% inner() %>
    </body>
  </html>
</%augment>