Parent Directory | Revision Log
added visible filed to Query model, so we can hide queries
1 | use strict; |
2 | use warnings; |
3 | |
4 | package SQLSession::Model::Query; |
5 | use Jifty::DBI::Schema; |
6 | use SQLSession::Model::Database; |
7 | |
8 | use SQLSession::Record schema { |
9 | column name => |
10 | type is 'text', |
11 | label is 'Name of query', |
12 | distinct, |
13 | hints is 'Short name for this query', |
14 | mandatory; |
15 | |
16 | column sql_query => |
17 | type is 'text', |
18 | label is 'SQL query', |
19 | mandatory, |
20 | distinct, |
21 | hints is 'Use this area to enter SQL query', |
22 | render as 'textarea'; |
23 | |
24 | column on_database => |
25 | refers_to SQLSession::Model::Database by 'id', |
26 | label is 'on database', |
27 | mandatory; |
28 | |
29 | column note => |
30 | type is 'text', |
31 | label is 'Note', |
32 | render as 'textarea', |
33 | since 0.0.2; |
34 | |
35 | column visible => |
36 | type is 'boolean', |
37 | default is 1, |
38 | since 0.0.3; |
39 | }; |
40 | |
41 | # Your model-specific methods go here. |
42 | |
43 | sub current_user_can { |
44 | return 1; |
45 | } |
46 | |
47 | 1; |
48 |
ViewVC Help | |
Powered by ViewVC 1.1.26 |