Changeset 3357 for extensions/pLoader/trunk/src/Uploader/GUI/wxHtmlWindow.pm

Timestamp:

May 27, 2009, 10:25:22 PM (15 years ago)

Author:

ronosman

Message:

Feature 1012 and 1013 : improved Getting started and Preview panel.

File:

• extensions/pLoader/trunk/src/Uploader/GUI/wxHtmlWindow.pm (modified) (2 diffs)

extensions/pLoader/trunk/src/Uploader/GUI/wxHtmlWindow.pm

@@ -28 +28 @@
   my $this = $class->SUPER::new( @_ );
 
-  if( -e '../res/intro.html' ){
-      $this->LoadPage( 
-          '../res/intro.html' 
-      );
-  }
+  return $this;
+}
 
-  return $this;
+sub InitHrefCallbacks {
+    my ( $self, $callbacks ) = @_;
+    
+    $callbacks ||={};
+    $self->{HrefCallbacks} = $callbacks ;       
 }
 
@@ -40 +41 @@
   my( $this, $link ) = @_;
 
-  Wx::LogMessage( 'Link clicked: href="%s"', $link->GetHref() );
-  $this->SUPER::OnLinkClicked( $link );
+  my $href = $link->GetHref();
+
+  $this->{HrefCallbacks}->{$href}->() if exists $this->{HrefCallbacks}->{$href};
+
 }