X-Git-Url: http://git.bytex64.net/?a=blobdiff_plain;f=rss.cgi;h=7faae424315f9eea3b891c0e6d402412cd0739d8;hb=refs%2Ftags%2Fv1.10;hp=11e1982b22cb7ca7414038581316a743031d32ef;hpb=c1ddc7d4eb83ca2dd17f72e88bf1e21518c1724c;p=blerg.git

diff --git a/rss.cgi b/rss.cgi
index 11e1982..7faae42 100755
--- a/rss.cgi
+++ b/rss.cgi
@@ -6,7 +6,7 @@ use POSIX qw/strftime/;
 use MIME::Base64;
 use strict;
 
-my $baseurl = Blerg::Database::constant('BASEURL');
+my $baseurl = Blerg::Database::BASEURL;
 
 sub xml_escape {
     local $_ = shift;
@@ -19,7 +19,6 @@ sub xml_escape {
 sub decode_basic_auth {
     my ($q) = @_;
 
-    my $authorization = 
     my ($method, $base64) = split(/\s+/, $q->http('Authorization'));
     if (!defined $method) {
         return;
@@ -109,9 +108,11 @@ HEADER
     for my $i (@items) {
         my $author = defined $i->{author} ? $i->{author} : $name;
         my $data = xml_escape(qq{<a href="${baseurl}#$author"><strong>\@$author</strong></a><br> $i->{data}});
+        my $title = xml_escape(substr($i->{data}, 0, 27)) . "...";
         my $post_time = strftime("%a, %d %b %Y %H:%M:%S %Z", localtime($i->{timestamp}));
         print <<ITEM;
     <item>
+      <title>$title</title>
       <pubDate>$post_time</pubDate>
       <guid>${baseurl}get/$author/$i->{record}</guid>
       <link>${baseurl}#$author/$i->{record}</link>