Changeset 26767 for gs3-extensions/html-to-expeditee/trunk/src/perllib/ExpediteeFrameIO.pm

Timestamp:

2013-01-21T19:07:55+13:00 (11 years ago)

Author:

davidb

Message:

Work done on linking collection browsing frames as well as linking to matching collection item frames.

File:

• gs3-extensions/html-to-expeditee/trunk/src/perllib/ExpediteeFrameIO.pm (modified) (2 diffs)

gs3-extensions/html-to-expeditee/trunk/src/perllib/ExpediteeFrameIO.pm

@@ -621 +621 @@
 
         my $attr = {};
-
+        
+        my $link = $html_node->{'link'};
+        $attr->{'F'} = $link if defined $link;
+        
         my $img_text = "\@i: $img_url";
 
@@ -649 +652 @@
     
     my $link = $html_node->{'link'};
-    $attr->{'l'} = $link if defined $link;
+    $attr->{'F'} = $link if defined $link;
 
     my $data = $html_node->{'data'};