/[webpac2]/Webpacus/lib/Webpacus/Controller/Editor.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 /Webpacus/lib/Webpacus/Controller/Editor.pm

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

revision 243 by dpavlin, Wed Dec 14 23:04:05 2005 UTC revision 258 by dpavlin, Fri Dec 16 13:20:51 2005 UTC
# Line 41  sub default : Private { Line 41  sub default : Private {
41    
42          $c->stash->{template_filename} = $template_filename;          $c->stash->{template_filename} = $template_filename;
43    
44            # get databases from config
45            my @databases;
46            my $config_dbs = $c->config->{databases};
47    
48            if (! $config_dbs) {
49                    $c->log->fail("didn't find databases in config");
50            } else {
51                    # convert to resonable format for TT
52                    foreach my $db (keys %{ $config_dbs }) {
53                            my $d = $config_dbs->{$db} || die;
54                            my $inputs = $d->{input} || next;
55                            $inputs = [ $inputs ] if (ref($inputs) ne 'ARRAY');
56    
57                            foreach my $i ( @{ $inputs } ) {
58                                    my $el = {
59                                            input   => $i->{name},
60                                            name    => $d->{name} || $d,
61                                            prefix  => $db . '/' . $i->{name},
62                                    };
63                                    push @databases, $el;
64                            }
65                    }
66            }
67    
68            $c->stash->{databases} = \@databases;
69    
70          $c->stash->{template} = 'editor.tt';          $c->stash->{template} = 'editor.tt';
71  }  }
72    
# Line 157  sub record : Local { Line 183  sub record : Local {
183          $c->log->debug('record params '.Dumper($c->req->params));          $c->log->debug('record params '.Dumper($c->req->params));
184    
185          my $record_uri = $c->req->params->{record_uri};          my $record_uri = $c->req->params->{record_uri};
186            $record_uri ||= $c->config->{editor}->{default_record_uri} and
187                    $c->log->warn("using editor: default_record_uri");
188    
189          if (! $record_uri) {          if (! $record_uri) {
190                  $c->log->fatal("no record_uri");                  $c->log->fatal("record called without record_uri and default_record_uri not found in config under editor");
191                  $c->stash->{error} = 'record retrival failed';                  $c->stash->{error} = 'record retrival failed';
192                  $c->stash->{template} = 'error.tt';                  $c->stash->{template} = 'error.tt';
193                  return;                  return;
Legend:
Removed from v.243  
changed lines
  Added in v.258
  ViewVC Help
Powered by ViewVC 1.1.26