Menu
▾
▴
q40-leglug-cvs — Q40 LEGLUG CVS Commits
You can subscribe to this list here.
| 2005 |
Jan
|
Feb
(7) |
Mar
(11) |
Apr
|
May
(1) |
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
|---|
|
From: Chady K. <do...@us...> - 2005-05-02 08:03:13
|
Update of /cvsroot/q40/web/public_html In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv15601 Modified Files: new.css Log Message: minor addition so that links are visible in the events box Index: new.css =================================================================== RCS file: /cvsroot/q40/web/public_html/new.css,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** new.css 23 Mar 2005 08:15:11 -0000 1.2 --- new.css 2 May 2005 08:03:05 -0000 1.3 *************** *** 285,286 **** --- 285,289 ---- .highlight3 { background: magenta; } + div#events a { + color: #e9e6d9; + } |
|
From: Chady K. <do...@us...> - 2005-03-23 08:15:55
|
Update of /cvsroot/q40/web/public_html In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7167/public_html Modified Files: new.css Log Message: Search functionality, highlighting.. Index: new.css =================================================================== RCS file: /cvsroot/q40/web/public_html/new.css,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -C2 -d -r1.1.1.1 -r1.2 *** new.css 12 Mar 2005 08:44:32 -0000 1.1.1.1 --- new.css 23 Mar 2005 08:15:11 -0000 1.2 *************** *** 281,285 **** ! ! --- 281,286 ---- ! .highlight1 { background: yellow; } ! .highlight2 { background: orange; } ! .highlight3 { background: magenta; } |
|
From: Chady K. <do...@us...> - 2005-03-23 08:15:54
|
Update of /cvsroot/q40/web/lib In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7167/lib Modified Files: LinuxLB.pm Log Message: Search functionality, highlighting.. Index: LinuxLB.pm =================================================================== RCS file: /cvsroot/q40/web/lib/LinuxLB.pm,v retrieving revision 1.6 retrieving revision 1.7 diff -C2 -d -r1.6 -r1.7 *** LinuxLB.pm 22 Mar 2005 10:33:27 -0000 1.6 --- LinuxLB.pm 23 Mar 2005 08:15:11 -0000 1.7 *************** *** 254,257 **** --- 254,263 ---- } } else { + param('title', param('node')); + param('node', 'Search'); + + return $self->select_page(); + + $self->{page}->{title} = "Not Found"; $self->{page}->{contents} = "The page you requested does not exist."; *************** *** 869,873 **** print $token->[2] if ($token->[0] eq 'E' && $token->[1] ne "perl"); ! print parse_links($token->[1]) if $token->[0] eq 'T'; #keep comments print '<!-- ', $token->[1], ' -->' if $token->[0] eq 'C'; --- 875,879 ---- print $token->[2] if ($token->[0] eq 'E' && $token->[1] ne "perl"); ! print highlight(parse_links($token->[1])) if $token->[0] eq 'T'; #keep comments print '<!-- ', $token->[1], ' -->' if $token->[0] eq 'C'; *************** *** 876,879 **** --- 882,904 ---- } + # highlight the text for search results + # + sub highlight { + my $text = shift; + + my $h = param('highlight') || return $text; + + my $i = 1; + for (split /\s+/, $h, 3) { # max three results + + next if /[<>]/; # skip html tags. + if ($text !~ /<[^>]*\Q$_\E/i) { + $text =~ s/(\Q$_\E)/span({-class=>"highlight$i"}, $1)/ieg; + $i++; + } + } + return $text; + } + # parse_links # |
|
From: Chady K. <do...@us...> - 2005-03-22 10:33:37
|
Update of /cvsroot/q40/web/lib In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv20722 Modified Files: LinuxLB.pm Log Message: added author, and changed to RSS version 2.0, I'm outdated. Index: LinuxLB.pm =================================================================== RCS file: /cvsroot/q40/web/lib/LinuxLB.pm,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** LinuxLB.pm 22 Mar 2005 10:20:05 -0000 1.5 --- LinuxLB.pm 22 Mar 2005 10:33:27 -0000 1.6 *************** *** 115,124 **** sub rss { my $self = shift; ! my $sth = $self->{_db}->{HANDLE}->prepare("SELECT id, title, contents, created FROM news"); ! $sth->execute(); my $xml = qq| ! <rss version="0.91"> <channel> <title>LEGLUG News</title> --- 115,135 ---- sub rss { my $self = shift; ! my $sth = $self->{_db}->{HANDLE}->prepare ! ("SELECT ! news.id as id, ! news.title as title, ! news.contents as contents, ! news.created as created, ! users.name as author ! FROM news, users ! WHERE ! news.author = users.id ! ORDER BY news.id DESC ! "); ! $sth->execute(); my $xml = qq| ! <rss version="2.0" xmlns:dc="http://purl.org/dc/elements/1.1/"> <channel> <title>LEGLUG News</title> *************** *** 143,149 **** $xml .= qq| <item> ! <title>$ref->{title} - $ref->{created}</title> <description>$cont</description> <link>http://leglug.org/node/Show+News;id=$ref->{id}</link> </item> |; --- 154,162 ---- $xml .= qq| <item> ! <title>$ref->{title}</title> <description>$cont</description> <link>http://leglug.org/node/Show+News;id=$ref->{id}</link> + <dc:creator>$ref->{author}</dc:creator> + <dc:date>$ref->{created}</dc:date> </item> |; |
|
From: Chady K. <do...@us...> - 2005-03-22 10:20:18
|
Update of /cvsroot/q40/web/lib In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv13093 Modified Files: LinuxLB.pm Log Message: simple RSS generator started. NOTE: we should see what to do with the HTML inside the news items. Index: LinuxLB.pm =================================================================== RCS file: /cvsroot/q40/web/lib/LinuxLB.pm,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** LinuxLB.pm 15 Mar 2005 09:32:28 -0000 1.4 --- LinuxLB.pm 22 Mar 2005 10:20:05 -0000 1.5 *************** *** 15,19 **** my $DB = 'leglug'; my $DB_USER = 'leglug'; ! my $DB_PASS = ''; # changeme our $URL = '/index.pl'; --- 15,19 ---- my $DB = 'leglug'; my $DB_USER = 'leglug'; ! my $DB_PASS = ''; our $URL = '/index.pl'; *************** *** 30,34 **** my %nocache = map {$_=>$_} ( ! 'Users', 'editor', ); --- 30,34 ---- my %nocache = map {$_=>$_} ( ! 'Users', ); *************** *** 100,106 **** sub manage_op { my $self = shift; ! if (param('op') eq 'regenerate') { $self->uncache(param('node')); } } --- 100,160 ---- sub manage_op { my $self = shift; ! my $op = param('op'); ! if ($op eq 'regenerate') { $self->uncache(param('node')); } + + # hack. + if (param('node') eq 'rss') { + + $self->rss(); + + } + } + + sub rss { + my $self = shift; + my $sth = $self->{_db}->{HANDLE}->prepare("SELECT id, title, contents, created FROM news"); + + $sth->execute(); + + my $xml = qq| + <rss version="0.91"> + <channel> + <title>LEGLUG News</title> + <link>http://leglug.org</link> + <description> + bleh + </description> + <language>en-us</language> + |; + while (my $ref = $sth->fetchrow_hashref()) { + + my $cont = $ref->{contents}; + + $cont =~ s[<br\/?>][\n]g; + $cont =~ s/\[\[//g; + $cont =~ s/\]\]//g; + + $cont =~ s[&(?!amp;)][&]g; # escape & + $cont =~ s[>][>]g; # escape > + $cont =~ s[<][<]g; # escape < + + $xml .= qq| + <item> + <title>$ref->{title} - $ref->{created}</title> + <description>$cont</description> + <link>http://leglug.org/node/Show+News;id=$ref->{id}</link> + </item> + |; + + } + + $xml .= qq|\t</channel>\n</rss>\n|; + + print header(-type=>'text/xml'); + print $xml; + exit 0; + } *************** *** 836,840 **** if ($link !~ /^(http|ftp|mailto|irc):/) { if (REWRITE_ON) { ! $link =~ s/\?/%3F/g; # this here because of rewriting. # ? will be eaten by the webserver. $link = "/node/$link"; --- 890,894 ---- if ($link !~ /^(http|ftp|mailto|irc):/) { if (REWRITE_ON) { ! $link =~ s/\?/%3F/g; # this here because of rewriting. # ? will be eaten by the webserver. $link = "/node/$link"; |
|
From: Chady K. <do...@us...> - 2005-03-15 09:32:39
|
Update of /cvsroot/q40/web/lib In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv5418 Modified Files: LinuxLB.pm Log Message: Due to the rewrite rules, nodes having a question mark in the title were not getting displayed, because the webserver would consider that the start of a query, and it will be stripped off before reading the rewrite rules. This patch escapes the ? into %3F for links. Index: LinuxLB.pm =================================================================== RCS file: /cvsroot/q40/web/lib/LinuxLB.pm,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** LinuxLB.pm 12 Mar 2005 10:42:29 -0000 1.3 --- LinuxLB.pm 15 Mar 2005 09:32:28 -0000 1.4 *************** *** 836,839 **** --- 836,841 ---- if ($link !~ /^(http|ftp|mailto|irc):/) { if (REWRITE_ON) { + $link =~ s/\?/%3F/g; # this here because of rewriting. + # ? will be eaten by the webserver. $link = "/node/$link"; } else { |
|
From: Chady K. <do...@us...> - 2005-03-12 10:42:41
|
Update of /cvsroot/q40/web/lib In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv12480/lib Modified Files: LinuxLB.pm Log Message: more mod_rewrite stuff. Index: LinuxLB.pm =================================================================== RCS file: /cvsroot/q40/web/lib/LinuxLB.pm,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** LinuxLB.pm 12 Mar 2005 08:56:50 -0000 1.2 --- LinuxLB.pm 12 Mar 2005 10:42:29 -0000 1.3 *************** *** 11,19 **** use constant VERSION => '0.2'; ! use constant REWRITE_ON => 0; ! use constant DB => 'leglug'; ! use constant DB_USER => 'leglug'; ! use constant DB_PASS => ''; --- 11,21 ---- use constant VERSION => '0.2'; ! use constant REWRITE_ON => 1; ! my $DB = 'leglug'; ! my $DB_USER = 'leglug'; ! my $DB_PASS = ''; # changeme ! ! our $URL = '/index.pl'; *************** *** 28,32 **** my %nocache = map {$_=>$_} ( ! 'Users', ); --- 30,34 ---- my %nocache = map {$_=>$_} ( ! 'Users', 'editor', ); *************** *** 229,233 **** $self->extra(); } else { ! print div({-id=>'extra'}, a({-href=>"/index.pl?node=login&return=$self->{page}->{title}"}, '<img src="images/login.gif" border="0" alt="[LOGIN]" />')); } --- 231,235 ---- $self->extra(); } else { ! print div({-id=>'extra'}, a({-href=>"$URL?node=login&return=$self->{page}->{title}"}, '<img src="images/login.gif" border="0" alt="[LOGIN]" />')); } *************** *** 353,357 **** # If the page does not exist add a link to create it. my $title = param('node'); ! print a({-href=>"/index.pl?node=editor&title=$title&mode=add"}, "Create [$title]"), " "; --- 355,359 ---- # If the page does not exist add a link to create it. my $title = param('node'); ! print a({-href=>"$URL?node=editor&title=$title&mode=add"}, "Create [$title]"), " "; *************** *** 364,373 **** # EDIT link ! print a({-href=>"/index.pl?node=editor&title=$self->{page}->{title}&mode=edit"}, '<img src="images/edit.gif" border="0" alt="[EDIT]" />'), " " unless( $p eq 'U' && $self->{page}->{owner_id} != $self->{user}->{id} && $self->{page}->{owner} ne 'site'); # DELETE link ! print a({-href=>"/index.pl?node=delete&title=$self->{page}->{title}"}, qq|<img src="images/delete.gif" border="0" alt="[Delete $self->{page}->{title}]" />|), " " unless( $self->{page}->{type} eq 'code' --- 366,375 ---- # EDIT link ! print a({-href=>"$URL?node=editor&title=$self->{page}->{title}&mode=edit"}, '<img src="images/edit.gif" border="0" alt="[EDIT]" />'), " " unless( $p eq 'U' && $self->{page}->{owner_id} != $self->{user}->{id} && $self->{page}->{owner} ne 'site'); # DELETE link ! print a({-href=>"$URL?node=delete&title=$self->{page}->{title}"}, qq|<img src="images/delete.gif" border="0" alt="[Delete $self->{page}->{title}]" />|), " " unless( $self->{page}->{type} eq 'code' *************** *** 378,405 **** # View History ! print a({-href=>"/index.pl?node=History&title=$self->{page}->{title}&node_id=$self->{page}->{id}"}, '<img src="images/history.gif" border="0" alt="[History]" />'), " " if $t eq 'code'; =pod # ADD NODE TO... link ! print a({-href=>"/index.pl?node=Add Node To&title=$self->{page}->{title}"}, '<img src="images/addnodeto.gif" border="0" alt="[Add this node to...]" />'), " "; =cut # VIEW SOURCE link ! print a({-href=>"/index.pl?node=view source&title=$self->{page}->{title}"}, '<img src="images/viewsource.gif" border="0" alt="[View Source]" />'), " " if $t eq 'code'; # ADD NEW NODE link ! print a({-href=>"/index.pl?node=editor&mode=add"}, '<img src="images/add.gif" border="0" alt="[Add a new node]" />'), " "; # ADD EDITOR link ! # print a({-href=>"/index.pl?node=add user"}, "[Add a User]"), " " # if $self->{user}->{name} =~ /^(jad|root)$/i; # Logged in section print span({-class=>"hot"}, "logged in as ", strong($self->{user}->{name})), " "; ! print a({-href=>"/index.pl?user=Visitor&pass=logout"}, '<img src="images/logout.gif" border="0" alt="[LOGOUT]" />'); --- 380,407 ---- # View History ! print a({-href=>"$URL?node=History&title=$self->{page}->{title}&node_id=$self->{page}->{id}"}, '<img src="images/history.gif" border="0" alt="[History]" />'), " " if $t eq 'code'; =pod # ADD NODE TO... link ! print a({-href=>"$URL?node=Add Node To&title=$self->{page}->{title}"}, '<img src="images/addnodeto.gif" border="0" alt="[Add this node to...]" />'), " "; =cut # VIEW SOURCE link ! print a({-href=>"$URL?node=view source&title=$self->{page}->{title}"}, '<img src="images/viewsource.gif" border="0" alt="[View Source]" />'), " " if $t eq 'code'; # ADD NEW NODE link ! print a({-href=>"$URL?node=editor&mode=add"}, '<img src="images/add.gif" border="0" alt="[Add a new node]" />'), " "; # ADD EDITOR link ! # print a({-href=>"$URL?node=add user"}, "[Add a User]"), " " # if $self->{user}->{name} =~ /^(jad|root)$/i; # Logged in section print span({-class=>"hot"}, "logged in as ", strong($self->{user}->{name})), " "; ! print a({-href=>"$URL?user=Visitor&pass=logout"}, '<img src="images/logout.gif" border="0" alt="[LOGOUT]" />'); *************** *** 677,681 **** $self->{_db}->{HANDLE} = ! DBI->connect("DBI:mysql:database=DB", DB_USER, DB_PASS, {RaiseError=>1}); --- 679,683 ---- $self->{_db}->{HANDLE} = ! DBI->connect("DBI:mysql:database=$DB", $DB_USER, $DB_PASS, {RaiseError=>1}); *************** *** 836,840 **** $link = "/node/$link"; } else { ! $link = "/index.pl?node=" . $link; } } --- 838,842 ---- $link = "/node/$link"; } else { ! $link = "$URL?node=" . $link; } } *************** *** 934,938 **** } elsif ($title) { ! print start_form('GET', CGI::url()); print hidden('node'); print hidden('title'); --- 936,940 ---- } elsif ($title) { ! print start_form('GET', $URL); print hidden('node'); print hidden('title'); *************** *** 1072,1078 **** print div("Editing ", ! a({-href=>"?node=$title"}, $title)) if param('title'); Delete('mode'); ! print start_form('POST', CGI::url()), hidden('node', 'editor'), hidden('mode', 'edit'), --- 1074,1080 ---- print div("Editing ", ! LinuxLB::parse_links("[[$title]]")) if param('title'); Delete('mode'); ! print start_form('POST', $URL), hidden('node', 'editor'), hidden('mode', 'edit'), *************** *** 1145,1149 **** print p('If you are certain that you wish to delete this node, click on the button below.'); ! print start_form('POST', CGI::url()), hidden('node', 'delete'), hidden('title', param('title')), hidden('sure', 'yes'), --- 1147,1151 ---- print p('If you are certain that you wish to delete this node, click on the button below.'); ! print start_form('POST', $URL), hidden('node', 'delete'), hidden('title', param('title')), hidden('sure', 'yes'), *************** *** 1186,1190 **** } ! print start_form('POST', CGI::url()), hidden('node', 'Add User'), textfield('n'), 'Username', br, textfield('p'), 'Password', br, --- 1188,1192 ---- } ! print start_form('POST', $URL), hidden('node', 'Add User'), textfield('n'), 'Username', br, textfield('p'), 'Password', br, *************** *** 1318,1322 **** print q|</pre>|; print hr, ! a({-href=>"/index.pl?node=history&node_id=$node&title=$title"}, "[View other edits]"); return; --- 1320,1324 ---- print q|</pre>|; print hr, ! a({-href=>"$URL?node=history&node_id=$node&title=$title"}, "[View other edits]"); return; *************** *** 1342,1346 **** $ts =~ s/^(\d{4})(\d\d)(\d\d)(\d\d)(\d\d)(\d\d)/$3, $2, $1 at $4:$5:$6/; print q|<tr> ! <td>|, a({-href=>"/index.pl?node=history&node_id=$node&title=$title&row=$ref->{id}"}, "[View]"), qq|</td><td>$ref->{title}</td><td>$ref->{user}</td><td>$ts</td> </tr>|; --- 1344,1348 ---- $ts =~ s/^(\d{4})(\d\d)(\d\d)(\d\d)(\d\d)(\d\d)/$3, $2, $1 at $4:$5:$6/; print q|<tr> ! <td>|, a({-href=>"$URL?node=history&node_id=$node&title=$title&row=$ref->{id}"}, "[View]"), qq|</td><td>$ref->{title}</td><td>$ref->{user}</td><td>$ts</td> </tr>|; *************** *** 1426,1430 **** ! print start_form('GET', CGI::url()); print hidden('node'); --- 1428,1432 ---- ! print start_form('GET', $URL); print hidden('node'); *************** *** 1441,1445 **** while (my $ref = $sth->fetchrow_hashref()) { my $class = $ref->{is_read} eq 'N' ? 'unread' : ''; ! print li({-class=>$class}, 'From: ', a({-href=>"/index.pl?node=Send Message&to=$ref->{from_id}"}, $ref->{from_user}), " : ", # stickies. qq|<input type="checkbox" name="DELETE" value="$ref->{id}" /> delete| , --- 1443,1447 ---- while (my $ref = $sth->fetchrow_hashref()) { my $class = $ref->{is_read} eq 'N' ? 'unread' : ''; ! print li({-class=>$class}, 'From: ', a({-href=>"$URL?node=Send Message&to=$ref->{from_id}"}, $ref->{from_user}), " : ", # stickies. qq|<input type="checkbox" name="DELETE" value="$ref->{id}" /> delete| , *************** *** 1492,1496 **** } else { ! print start_form('GET', CGI::url()); print hidden('node'); print 'To : ', popup_menu('to', [keys %users], $to, \%users), br; --- 1494,1498 ---- } else { ! print start_form('GET', $URL); print hidden('node'); print 'To : ', popup_menu('to', [keys %users], $to, \%users), br; *************** *** 1715,1719 **** print LinuxLB::parse_links($news->{contents}); } else { ! print start_form("POST"); print hidden('node'), qq|<input type="hidden" name="id" value="$id">|; print textfield('title', $news->{title}); --- 1717,1721 ---- print LinuxLB::parse_links($news->{contents}); } else { ! print start_form("POST", $URL); print hidden('node'), qq|<input type="hidden" name="id" value="$id">|; print textfield('title', $news->{title}); *************** *** 1791,1795 **** print LinuxLB::parse_links(div("Username: [[$$SITE->{user}->{name}]]")); ! print start_form("POST"); print hidden('node'); print p('If you want to change your password, enter the new one --- 1793,1797 ---- print LinuxLB::parse_links(div("Username: [[$$SITE->{user}->{name}]]")); ! print start_form("POST", $URL); print hidden('node'); print p('If you want to change your password, enter the new one *************** *** 1972,1976 **** my %priv = qw/U User D Developer E Editor/; ! my $html = q|<table border="1">| . start_form("POST"); $html .= q|<style>table * { font-size: 9px }</style>|; $html .= hidden('node'); --- 1974,1978 ---- my %priv = qw/U User D Developer E Editor/; ! my $html = q|<table border="1">| . start_form("POST", $URL); $html .= q|<style>table * { font-size: 9px }</style>|; $html .= hidden('node'); |
|
From: Chady K. <do...@us...> - 2005-03-12 08:57:03
|
Update of /cvsroot/q40/web/lib In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv20715/lib Modified Files: LinuxLB.pm Log Message: The `web' module represents the leglug.org website. Index: LinuxLB.pm =================================================================== RCS file: /cvsroot/q40/web/lib/LinuxLB.pm,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -C2 -d -r1.1.1.1 -r1.2 *** LinuxLB.pm 12 Mar 2005 08:44:26 -0000 1.1.1.1 --- LinuxLB.pm 12 Mar 2005 08:56:50 -0000 1.2 *************** *** 10,13 **** --- 10,14 ---- use constant CODE_NAME => 'liki'; use constant VERSION => '0.2'; + use constant REWRITE_ON => 0; *************** *** 228,232 **** $self->extra(); } else { ! print div({-id=>'extra'}, a({-href=>"index.pl?node=login&return=$self->{page}->{title}"}, '<img src="images/login.gif" border="0" alt="[LOGIN]" />')); } --- 229,233 ---- $self->extra(); } else { ! print div({-id=>'extra'}, a({-href=>"/index.pl?node=login&return=$self->{page}->{title}"}, '<img src="images/login.gif" border="0" alt="[LOGIN]" />')); } *************** *** 352,356 **** # If the page does not exist add a link to create it. my $title = param('node'); ! print a({-href=>"index.pl?node=editor&title=$title&mode=add"}, "Create [$title]"), " "; --- 353,357 ---- # If the page does not exist add a link to create it. my $title = param('node'); ! print a({-href=>"/index.pl?node=editor&title=$title&mode=add"}, "Create [$title]"), " "; *************** *** 363,372 **** # EDIT link ! print a({-href=>"index.pl?node=editor&title=$self->{page}->{title}&mode=edit"}, '<img src="images/edit.gif" border="0" alt="[EDIT]" />'), " " unless( $p eq 'U' && $self->{page}->{owner_id} != $self->{user}->{id} && $self->{page}->{owner} ne 'site'); # DELETE link ! print a({-href=>"index.pl?node=delete&title=$self->{page}->{title}"}, qq|<img src="images/delete.gif" border="0" alt="[Delete $self->{page}->{title}]" />|), " " unless( $self->{page}->{type} eq 'code' --- 364,373 ---- # EDIT link ! print a({-href=>"/index.pl?node=editor&title=$self->{page}->{title}&mode=edit"}, '<img src="images/edit.gif" border="0" alt="[EDIT]" />'), " " unless( $p eq 'U' && $self->{page}->{owner_id} != $self->{user}->{id} && $self->{page}->{owner} ne 'site'); # DELETE link ! print a({-href=>"/index.pl?node=delete&title=$self->{page}->{title}"}, qq|<img src="images/delete.gif" border="0" alt="[Delete $self->{page}->{title}]" />|), " " unless( $self->{page}->{type} eq 'code' *************** *** 377,404 **** # View History ! print a({-href=>"index.pl?node=History&title=$self->{page}->{title}&node_id=$self->{page}->{id}"}, '<img src="images/history.gif" border="0" alt="[History]" />'), " " if $t eq 'code'; =pod # ADD NODE TO... link ! print a({-href=>"index.pl?node=Add Node To&title=$self->{page}->{title}"}, '<img src="images/addnodeto.gif" border="0" alt="[Add this node to...]" />'), " "; =cut # VIEW SOURCE link ! print a({-href=>"index.pl?node=view source&title=$self->{page}->{title}"}, '<img src="images/viewsource.gif" border="0" alt="[View Source]" />'), " " if $t eq 'code'; # ADD NEW NODE link ! print a({-href=>"index.pl?node=editor&mode=add"}, '<img src="images/add.gif" border="0" alt="[Add a new node]" />'), " "; # ADD EDITOR link ! # print a({-href=>"index.pl?node=add user"}, "[Add a User]"), " " # if $self->{user}->{name} =~ /^(jad|root)$/i; # Logged in section print span({-class=>"hot"}, "logged in as ", strong($self->{user}->{name})), " "; ! print a({-href=>"index.pl?user=Visitor&pass=logout"}, '<img src="images/logout.gif" border="0" alt="[LOGOUT]" />'); --- 378,405 ---- # View History ! print a({-href=>"/index.pl?node=History&title=$self->{page}->{title}&node_id=$self->{page}->{id}"}, '<img src="images/history.gif" border="0" alt="[History]" />'), " " if $t eq 'code'; =pod # ADD NODE TO... link ! print a({-href=>"/index.pl?node=Add Node To&title=$self->{page}->{title}"}, '<img src="images/addnodeto.gif" border="0" alt="[Add this node to...]" />'), " "; =cut # VIEW SOURCE link ! print a({-href=>"/index.pl?node=view source&title=$self->{page}->{title}"}, '<img src="images/viewsource.gif" border="0" alt="[View Source]" />'), " " if $t eq 'code'; # ADD NEW NODE link ! print a({-href=>"/index.pl?node=editor&mode=add"}, '<img src="images/add.gif" border="0" alt="[Add a new node]" />'), " "; # ADD EDITOR link ! # print a({-href=>"/index.pl?node=add user"}, "[Add a User]"), " " # if $self->{user}->{name} =~ /^(jad|root)$/i; # Logged in section print span({-class=>"hot"}, "logged in as ", strong($self->{user}->{name})), " "; ! print a({-href=>"/index.pl?user=Visitor&pass=logout"}, '<img src="images/logout.gif" border="0" alt="[LOGOUT]" />'); *************** *** 835,839 **** $link = "/node/$link"; } else { ! $link = "index.pl?node=" . $link; } } --- 836,840 ---- $link = "/node/$link"; } else { ! $link = "/index.pl?node=" . $link; } } *************** *** 1317,1321 **** print q|</pre>|; print hr, ! a({-href=>"index.pl?node=history&node_id=$node&title=$title"}, "[View other edits]"); return; --- 1318,1322 ---- print q|</pre>|; print hr, ! a({-href=>"/index.pl?node=history&node_id=$node&title=$title"}, "[View other edits]"); return; *************** *** 1341,1345 **** $ts =~ s/^(\d{4})(\d\d)(\d\d)(\d\d)(\d\d)(\d\d)/$3, $2, $1 at $4:$5:$6/; print q|<tr> ! <td>|, a({-href=>"index.pl?node=history&node_id=$node&title=$title&row=$ref->{id}"}, "[View]"), qq|</td><td>$ref->{title}</td><td>$ref->{user}</td><td>$ts</td> </tr>|; --- 1342,1346 ---- $ts =~ s/^(\d{4})(\d\d)(\d\d)(\d\d)(\d\d)(\d\d)/$3, $2, $1 at $4:$5:$6/; print q|<tr> ! <td>|, a({-href=>"/index.pl?node=history&node_id=$node&title=$title&row=$ref->{id}"}, "[View]"), qq|</td><td>$ref->{title}</td><td>$ref->{user}</td><td>$ts</td> </tr>|; *************** *** 1440,1444 **** while (my $ref = $sth->fetchrow_hashref()) { my $class = $ref->{is_read} eq 'N' ? 'unread' : ''; ! print li({-class=>$class}, 'From: ', a({-href=>"index.pl?node=Send Message&to=$ref->{from_id}"}, $ref->{from_user}), " : ", # stickies. qq|<input type="checkbox" name="DELETE" value="$ref->{id}" /> delete| , --- 1441,1445 ---- while (my $ref = $sth->fetchrow_hashref()) { my $class = $ref->{is_read} eq 'N' ? 'unread' : ''; ! print li({-class=>$class}, 'From: ', a({-href=>"/index.pl?node=Send Message&to=$ref->{from_id}"}, $ref->{from_user}), " : ", # stickies. qq|<input type="checkbox" name="DELETE" value="$ref->{id}" /> delete| , |
|
From: Chady K. <do...@us...> - 2005-03-12 08:57:03
|
Update of /cvsroot/q40/web/public_html/images/.xvpics In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv20715/public_html/images/.xvpics Removed Files: add-to.gif Log Message: The `web' module represents the leglug.org website. --- add-to.gif DELETED --- |
|
From: Chady K. <do...@us...> - 2005-03-12 08:24:11
|
Update of /cvsroot/q40/graphics/logo In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14769/graphics/logo Removed Files: phoenix.svg.gz Log Message: The `graphics' folder makes no sense anymore, and the data in there is just slowing checkouts. So here we kiss it goodbye. --- phoenix.svg.gz DELETED --- |
|
From: Chady K. <do...@us...> - 2005-03-12 08:24:07
|
Update of /cvsroot/q40/graphics/bootsplash In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14769/graphics/bootsplash Removed Files: silent.xcf.bz2 Log Message: The `graphics' folder makes no sense anymore, and the data in there is just slowing checkouts. So here we kiss it goodbye. --- silent.xcf.bz2 DELETED --- |
|
From: Chady K. <do...@us...> - 2005-03-12 08:24:05
|
Update of /cvsroot/q40/graphics In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14769/graphics Removed Files: README layout1.xcf.bz2 Log Message: The `graphics' folder makes no sense anymore, and the data in there is just slowing checkouts. So here we kiss it goodbye. --- README DELETED --- --- layout1.xcf.bz2 DELETED --- |
|
From: Chady K. <do...@us...> - 2005-02-25 14:35:01
|
Update of /cvsroot/q40/docs/sfhowto In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv25918 Modified Files: index.html Log Message: testing to see if I have write access... Index: index.html =================================================================== RCS file: /cvsroot/q40/docs/sfhowto/index.html,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** index.html 25 Feb 2005 14:00:34 -0000 1.4 --- index.html 25 Feb 2005 14:34:49 -0000 1.5 *************** *** 102,103 **** --- 102,104 ---- </body> </html> + |
|
From: Hisham M. B. <cod...@us...> - 2005-02-25 14:01:11
|
Update of /cvsroot/q40/docs/sfhowto In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv15324 Modified Files: index.html Log Message: finished forums section Index: index.html =================================================================== RCS file: /cvsroot/q40/docs/sfhowto/index.html,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** index.html 22 Feb 2005 22:31:58 -0000 1.3 --- index.html 25 Feb 2005 14:00:34 -0000 1.4 *************** *** 81,85 **** <div class="author"><span class="baseline">Part IV - Using Forums</span></div> <div class="essay"> ! <a href="http://sourceforge.net/projects/q40">Using Forums:</a> </div> --- 81,92 ---- <div class="author"><span class="baseline">Part IV - Using Forums</span></div> <div class="essay"> ! <a href="http://sourceforge.net/forum/?group_id=35561">Using Forums:</a> ! We have decided to use forums for content that is debatable and doesnt need to get pushed to users. We have several active forums, which also have the capabality to send their posts to special mailing lists in case one would like to recieve the content via email. Those lists can not be used to post forum items. To access the forums, first go to the project <a href="http://sf.net/projects/q40">page</a> and click on the "Forums" link. Please note that to be able to post to the forums you need to be signed into sf with your username and password, otherwise, you can only view the forums. ! <div class="logo"><img alt="Forums Link" class="read" src="images/forums_link.png"/></div> ! Once there, you will have a listing of the forum categories. If you cant find the exact category you want to post to, then choose the one closest to it. Lets try and post something to the "General Discussions" forum. We start off by clicking the link to the forum: ! <div class="logo"><img alt="Forums Choose Forum" class="read" src="images/forums_choose.png"/></div> ! After choosing a forum category, you can either browse aroudn the posts by clicking them, or you could start a new thread by typing a subject and body for it. ! <div class="logo"><img alt="Forums New Thread" class="read" src="images/forums_new.png"/></div> ! After submitted your post, everyone viewing that forum can read and comment on it. Forums also provide you the ability to view posts in several views and count. The navbar allows you to switch between those settings and the forums themselves, search forums, and monitor a forum to get post notifications. </div> |
|
From: Hisham M. B. <cod...@us...> - 2005-02-25 14:00:48
|
Update of /cvsroot/q40/docs/sfhowto/images In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv15324/images Added Files: forums_choose.png forums_link.png forums_new.png Log Message: finished forums section --- NEW FILE: forums_new.png --- (This appears to be a binary file; contents omitted.) --- NEW FILE: forums_choose.png --- (This appears to be a binary file; contents omitted.) --- NEW FILE: forums_link.png --- (This appears to be a binary file; contents omitted.) |
|
From: Hisham M. B. <cod...@us...> - 2005-02-22 22:32:14
|
Update of /cvsroot/q40/docs/sfhowto In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv9339 Modified Files: index.html Log Message: 1) added new images for list howto 2) added list howto TODO: forums / cvs howto Index: index.html =================================================================== RCS file: /cvsroot/q40/docs/sfhowto/index.html,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** index.html 22 Feb 2005 11:42:54 -0000 1.2 --- index.html 22 Feb 2005 22:31:58 -0000 1.3 *************** *** 63,71 **** services offered by sf. You should see something like this: <div class="logo"><img alt="Project Page Navigation" class="read" src="images/projpage_nav.png"/></div> </div> <div class="author"><span class="baseline">Part III - Using Mailing Lists</span></div> <div class="essay"> ! <a href="http://sourceforge.net/projects/q40">Using Mailing Lists:</a> </div> --- 63,80 ---- services offered by sf. You should see something like this: <div class="logo"><img alt="Project Page Navigation" class="read" src="images/projpage_nav.png"/></div> + Navigating through the project page is a fairly simple task. I wont go into that tight now, (perhaps we can fill this section in later), as it is more important to look into mailing lists and forums. </div> <div class="author"><span class="baseline">Part III - Using Mailing Lists</span></div> <div class="essay"> ! <a href="http://sourceforge.net/mail/?group_id=35561">Using Mailing Lists:</a> ! We use mailing lists mainly to discuss core issues, and to spread out announcements and important news. Why did we go for a mailing list and not a forum? Simple. The mailing list will assure that content is pushed to the user. Ordinary discussions can take place on our forums, which we will discuss in the next section. We have 3 mailing lists all in all, core, news, and cvs. You can subscribe to any of the lists. Core and news are read-only lists, as only core member discussions will take place (pertaining to policy issues, working out main events etc...). As for the news mailing list, the general idea is to have our main events, news, and announcements written in perfect english in such a way that other groups and websites can quote / take / use it verbatim. The first step to getting subscribed to the mailing lists is going to the project page (http://sf.net/projects/q40) and clicking on the "Lists" link. ! <div class="logo"><img alt="Mailing Lists Link" class="read" src="images/lists_link.png"/></div> ! After you click that, you're greeted with a page displaying the available mailing lists. We'll go through the process for CVS list. ! <div class="logo"><img alt="Mailing Lists Link" class="read" src="images/lists_sub.png"/></div> ! Once you click your desired mailing list, you have to fill in some details, namely your email address, a password for your settings, and wether you would like to receive emails as they come in or in daily digest. ! <div class="logo"><img alt="Mailing Lists Info" class="read" src="images/lists_info.png"/></div> ! With that done, all you have to do is send a reply to the email which you will receive in a little white. A normal reply (just hit the reply button) will suffice 99% of the time. You dont need to change the subject or body of the email. And with that, you're now subscribed to the mailing list. All emails will have a certain fixed subject which you can use in order to create filters for your mail client. I use Gmail, and like doing something along the following likes: ! <div class="logo"><img alt="Mailing Lists Filters" class="read" src="images/lists_filters.png"/></div> </div> |
|
From: Hisham M. B. <cod...@us...> - 2005-02-22 22:32:14
|
Update of /cvsroot/q40/docs/sfhowto/images In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv9339/images Added Files: lists_filters.png lists_info.png lists_link.png lists_sub.png Log Message: 1) added new images for list howto 2) added list howto TODO: forums / cvs howto --- NEW FILE: lists_filters.png --- (This appears to be a binary file; contents omitted.) --- NEW FILE: lists_sub.png --- (This appears to be a binary file; contents omitted.) --- NEW FILE: lists_info.png --- (This appears to be a binary file; contents omitted.) --- NEW FILE: lists_link.png --- (This appears to be a binary file; contents omitted.) |
|
From: Abdulaziz Al-A. <al...@us...> - 2005-02-22 12:41:15
|
Update of /cvsroot/q40/docs In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10852/docs Modified Files: README Log Message: stupid update Index: README =================================================================== RCS file: /cvsroot/q40/docs/README,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** README 22 Feb 2005 02:43:27 -0000 1.2 --- README 22 Feb 2005 12:41:06 -0000 1.3 *************** *** 1 **** ! All sorts of docs for LEGLUG --- 1 ---- ! All sorts of docs for LEGLUG, like this stupid completely useless README!! ;-) \ No newline at end of file |
|
From: Hisham M. B. <cod...@us...> - 2005-02-22 11:43:59
|
Update of /cvsroot/q40/docs/sfhowto In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv1058 Modified Files: index.html Log Message: seeing wether we'll get an email to the commits list Index: index.html =================================================================== RCS file: /cvsroot/q40/docs/sfhowto/index.html,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -C2 -d -r1.1.1.1 -r1.2 *** index.html 22 Feb 2005 02:16:46 -0000 1.1.1.1 --- index.html 22 Feb 2005 11:42:54 -0000 1.2 *************** *** 27,31 **** In order to participate in sf's serivces, you need to register a user account. The procedure is relatively simple. Just go to ! http://www.sourceforge.net and click the 'New User via SSL' link. <div class="logo"><img alt="New User Signup" class="read" src="images/newuser_link.png"/></div> After you click the link, you will be presented with form which you must --- 27,31 ---- In order to participate in sf's serivces, you need to register a user account. The procedure is relatively simple. Just go to ! http://www.sourceforge.net and click the "New User via SSL" link. <div class="logo"><img alt="New User Signup" class="read" src="images/newuser_link.png"/></div> After you click the link, you will be presented with form which you must |