diff options
Diffstat (limited to 'lib/Crater/Gallery.rakumod')
-rw-r--r-- | lib/Crater/Gallery.rakumod | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/lib/Crater/Gallery.rakumod b/lib/Crater/Gallery.rakumod new file mode 100644 index 0000000..ea92c47 --- /dev/null +++ b/lib/Crater/Gallery.rakumod @@ -0,0 +1,25 @@ +class Crater::Gallery { + has IO $.directory is required; + + method list() { + my @gallery; + for dir($!directory).sort(*.modified) { + if .IO.d { + + } elsif .IO.f { + my Str $ext = .extension.lc; + if $ext eq "jpg"|"png" { + push @gallery, %( :type<img>, :src($_.relative($!directory)) ); + } elsif $ext eq "0" { + push @gallery, %( :type<heading>, :text($_.slurp) ); + } elsif $ext eq "txt" { + push @gallery, %( :type<text>, :text($_.slurp) ); + } else { + warn "Unhandled file :$_"; + } + } + } + + return @gallery; + } +} |