Commit | Line | Data |
---|---|---|
6430ee52 TC |
1 | package BSE::TB::ArticleFileMeta; |
2 | use strict; | |
3 | use base 'Squirrel::Row'; | |
4 | ||
cb7fd78d TC |
5 | our $VERSION = "1.000"; |
6 | ||
6430ee52 TC |
7 | sub table { |
8 | "bse_article_file_meta"; | |
9 | } | |
10 | ||
11 | sub columns { | |
c840f7f9 | 12 | qw/id file_id name content_type value appdata/; |
6430ee52 TC |
13 | } |
14 | ||
15 | sub defaults { | |
16 | content_type => "text/plain", | |
c840f7f9 | 17 | appdata => 1, |
6430ee52 TC |
18 | } |
19 | ||
36e373a9 TC |
20 | sub is_text { |
21 | $_[0]->content_type eq "text/plain" | |
22 | } | |
23 | ||
6430ee52 | 24 | 1; |