From ed360e2eb57b39905f33508fe03714febfeb397b Mon Sep 17 00:00:00 2001
From: Brian Manning <brian@xaoc.org>
Date: Tue, 3 May 2016 16:21:24 -0700
Subject: [PATCH] pdflib_demo: linking from the second page to the first page
 works now

---
 pdflib_demo | 19 +++++++++++++------
 1 file changed, 13 insertions(+), 6 deletions(-)

diff --git a/pdflib_demo b/pdflib_demo
index ed478a5..610a68a 100755
--- a/pdflib_demo
+++ b/pdflib_demo
@@ -59,9 +59,9 @@ try {
       . "encoding=unicode ";
 
    $pdf->fit_textline("Jump to SSF for SHACK-10A", 20, 750,
-      $textOpts . " underline=true");
+      $textOpts); # . " underline=true matchbox={name=first_page}");
    $pdf->fit_textline("This is some text on the first page; ", 20, 720,
-      $textOpts);
+      $textOpts); # . " matchbox={name=first_page}");
    $pdf->fit_textline("Привет! Этот немного текста.", 20, 690, $textOpts);
 
    // END PAGE 1
@@ -76,6 +76,7 @@ try {
    $ssfPage = $pdf->open_pdi_page($ssfPDF, 1, '');
    $ssfWidth = $pdf->pcos_get_number($ssfPDF, "pages[0]/width");
    $ssfHeight = $pdf->pcos_get_number($ssfPDF, "pages[0]/height");
+   //print "Page width/height: $ssfWidth x $ssfHeight\n";
 
    $pdf->begin_page_ext($ssfWidth, $ssfHeight, '');
 
@@ -87,10 +88,16 @@ try {
    // for landscape mode...
    //$pdf->fit_textline("Back to Top", 20, 570,
    //$linkOpts = linkAttribs(1, 750);
-   $optList = "destination={page=1 type=fixed left=0 top=750}";
-   $action = $p->create_action("GoTo", $optList);
-   print_r($linkOpts);
-   $pdf->fit_textline("Back to Top", 20, 750, $linkOpts);
+   #$actionList = "destination={page=1 type=fixed left=0 top=750}";
+   $actionList = "destination={page=1}";
+   $action = $pdf->create_action("GoTo", $actionList);
+   $pdf->fit_textline("Back to Top", 20, $ssfHeight - 30,
+      $textOpts . " underline=true matchbox={name=first_page}");
+
+   // FIXME call create_annotation here
+   $optlist = "action={activate " . $action . "} linewidth=1 " .
+                 "usematchbox={first_page}";
+   $pdf->create_annotation(0, 0, 0, 0, "Link", $optlist);
 
    // END PAGE 2
    $pdf->end_page_ext('');
-- 
1.9.1