/[Frey]/trunk/lib/Frey/Server.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/lib/Frey/Server.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 56 by dpavlin, Sun Jul 6 11:59:58 2008 UTC revision 60 by dpavlin, Tue Jul 8 12:20:08 2008 UTC
# Line 9  use Data::Dump qw/dump/; Line 9  use Data::Dump qw/dump/;
9    
10  use Frey;  use Frey;
11  use Frey::Introspect;  use Frey::Introspect;
12    use Frey::ObjectBrowser;
13    
14  my @messages;    # Global (shared) list of messages  my @messages;    # Global (shared) list of messages
15  my $got_message; # Flag to indicate that there is a new message to display  my $got_message; # Flag to indicate that there is a new message to display
# Line 46  sub main { Line 47  sub main {
47                  $f->html( $req );                  $f->html( $req );
48          }          }
49    
50            if ( $path =~ m!/ob/([^/]+)(?:/([^/]*))?! ) {
51                    my $f = Frey::ObjectBrowser->new;
52                    $f->html( $req );
53            }
54          # If this is a request for the pushtream, then give them that          # If this is a request for the pushtream, then give them that
55          if($path =~ /pushstream/) {          if($path =~ /pushstream/) {
56                  pushstream($req);                  pushstream($req);
Legend:
Removed from v.56  
changed lines
  Added in v.60
  ViewVC Help
Powered by ViewVC 1.1.26