root/lang/perl/MENTOS/trunk/app/controller/entries.mt @ 27062

Revision 27062, 1.0 kB (checked in by mattn, 6 years ago)

merge from MENTA.

Line 
1? my ($entries) = @_;
2?= render('header.mt', config()->{application}->{title})
3                <div class="entries hfeed">
4? for my $entry (@{$entries}) {
5                                <div class="entry hentry">
6                                        <a rel="bookmark" class="entry-title" href="<?= docroot() ?>?id=<?= $entry->{id} ?>"><?=r $entry->{title} ?></a><br />
7                                        <div class="entry-content">
8                                                <?=r $entry->{description} ?>
9                                        </div>
10? if ($entry->{photo}) {
11                                        <blockquote class="photo">
12                                                <img src="<?= static_file_path($entry->{photo}) ?>" alt="写真" />
13                                        </blockquote>
14? }
15? my $tags = join ', ', map({ '<a href="#/'.escape_html($_).'" rel="tag">'.escape_html($_).'</a>' }  split(/\s*,\s*/, $entry->{meta}{tags}||''))
16                                        <div class="entry-tags">
17                                                <?=r $tags ?>
18                                        </div>
19                                        <div class="entry-date posted">
20                                                <abbr class="updated" title="<?= blog_iso8601($entry->{mtime}) ?>"><?= $entry->{pubdate} ?></abbr>
21                                        </div>
22                                </div>
23                                <br />
24? }
25                </div>
26                <p align="right"><a href="edit">新規編集</a></p>
27                <br />
28?= render('footer.mt')
Note: See TracBrowser for help on using the browser.