Contents of /trunk/share/web/templates/feed

<%args>
$type => 'RSS'
</%args>
<%init>
use XML::Feed;
my $queries = SQLSession::Model::QueryCollection->new();
$queries->unlimit();

my $feed = XML::Feed->new( $type );
$feed->title( Jifty->config->framework('ApplicationName') . " Feed" );
$feed->link( Jifty->web->url );
$feed->description( $feed->title );

use SQLSession::Utils;
my $u = Jifty->app_class('Utils');

while( my $q = $queries->next ) {
        my $feed_entry = XML::Feed::Entry->new($type);
        $feed_entry->title( $q->name . ' (' . $q->on_database->name . ')' );
        $feed_entry->author( $q->owner->name );
        $feed_entry->link( Jifty->web->url . "sql/" . $q->id );
        $feed_entry->issued( $q->created_on );
        #my $note .= "\n (database: " . $q->on_database->name . ")\n\n";
        $feed_entry->summary( $q->note .'<pre>' . $u->reformat_sql( $q->sql_query ) . '</pre>' );
        $feed->add_entry( $feed_entry );
}
</%init>
<% $feed->as_xml |n %>
1	<%args>
2	$type => 'RSS'
3	</%args>
4	<%init>
5	use XML::Feed;
6	my $queries = SQLSession::Model::QueryCollection->new();
7	$queries->unlimit();
8
9	my $feed = XML::Feed->new( $type );
10	$feed->title( Jifty->config->framework('ApplicationName') . " Feed" );
11	$feed->link( Jifty->web->url );
12	$feed->description( $feed->title );
13
14	use SQLSession::Utils;
15	my $u = Jifty->app_class('Utils');
16
17	while( my $q = $queries->next ) {
18	my $feed_entry = XML::Feed::Entry->new($type);
19	$feed_entry->title( $q->name . ' (' . $q->on_database->name . ')' );
20	$feed_entry->author( $q->owner->name );
21	$feed_entry->link( Jifty->web->url . "sql/" . $q->id );
22	$feed_entry->issued( $q->created_on );
23	#my $note .= "\n (database: " . $q->on_database->name . ")\n\n";
24	$feed_entry->summary( $q->note .'<pre>' . $u->reformat_sql( $q->sql_query ) . '</pre>' );
25	$feed->add_entry( $feed_entry );
26	}
27	</%init>
28	<% $feed->as_xml \|n %>