/[Frey]/trunk/lib/Frey/Introspect.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/Introspect.pm

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

revision 65 by dpavlin, Tue Jul 8 12:19:04 2008 UTC revision 66 by dpavlin, Wed Jul 9 12:08:07 2008 UTC
# Line 118  sub joose { Line 118  sub joose {
118          $out .= "\t\t},\n\t\tmeta: Frey.HTML,          $out .= "\t\t},\n\t\tmeta: Frey.HTML,
119                  classMethods: {                  classMethods: {
120                          renderHTML: function () {                          renderHTML: function () {
121                                  return new Joose.SimpleRequest().getText(\"/~/${m}::${c}\")                                  return new Joose.SimpleRequest().getText(\"/~/" . $self->package . "\")
122                          },\n";                          },\n";
123    
124          $out .= "\t\t},\n";          $out .= "\t\t},\n";
# Line 197  function $(id) { Line 197  function $(id) {
197  </script>  </script>
198  __END_OF_JS__  __END_OF_JS__
199    
200                  warn "# >>> js\n$js\n";                  warn "# >>> js\n$js\n" if $self->debug;
201    
202                  my $methods;                  my ( $class, $meta, $is_role ) = $self->load_package();
   
                 my ( $class, $meta, $is_role );  
                 eval { ( $class, $meta, $is_role ) = $self->load_package(); };  
                 if ( $@ ) {  
                         warn "ERROR: $@";  
                         $request->conn->send_status_line( 500, $@ );  
                         $request->print( $@ );  
                         $request->next;  
                         return;  
                 }  
203    
204                    my $methods;
205                  if ( $class->can('meta') ) {                  if ( $class->can('meta') ) {
206                          $methods = Continuity::Widget::DomNode->create(                          $methods = Continuity::Widget::DomNode->create(
207                                  ul => [                                  ul => [
Legend:
Removed from v.65  
changed lines
  Added in v.66
  ViewVC Help
Powered by ViewVC 1.1.26