diff options
| author | Ken Sharp <ken.sharp@artifex.com> | 2013-08-08 08:50:23 +0100 |
|---|---|---|
| committer | Ken Sharp <ken.sharp@artifex.com> | 2013-08-08 08:50:23 +0100 |
| commit | a850d6c6d14f3a40bb8d40e471bf4822ead8580d (patch) | |
| tree | 8306222402e858378f02119ac16e30339eefb1bf | |
| parent | 073f460af5bb37edb1849c5d6235048598100437 (diff) | |
| download | ghostpdl-a850d6c6d14f3a40bb8d40e471bf4822ead8580d.tar.gz | |
PDF Interpreter - update to 073f460af5bb37edb1849c5d6235048598100437
Bug #694508 "Regression: error writing PDF file starting with
72b397ecb4f5be3fdbf6da4a90a306d259ec3e93"
The commit 073f460af5bb37edb1849c5d6235048598100437 had an error in the
handling of named actions, which I didn't previously have a test case for.
NB the commit in the bug title is incorrect, I'm not clear on why Marcos
thought this was the commit which introduced the error.
This commit fixes that and allows me to test the named actions, which now
work correctly.
| -rw-r--r-- | gs/Resource/Init/pdf_main.ps | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/gs/Resource/Init/pdf_main.ps b/gs/Resource/Init/pdf_main.ps index a59b7a3ec..06f4eb768 100644 --- a/gs/Resource/Init/pdf_main.ps +++ b/gs/Resource/Init/pdf_main.ps @@ -1531,10 +1531,10 @@ end readonly def } bind def % <pagedict> mark ... -proc- <page#> <error> /namedactions 8 dict dup begin - /FirstPage { 1 /CumulativePageCount get add //false } def - /LastPage { pdfpagecount /CumulativePageCount get add //false } def - /NextPage { counttomark 2 add index pdfpagenumber 1 add dup pdfpagecount gt exch /CumulativePageCount get add exch} bind def - /PrevPage { counttomark 2 add index pdfpagenumber 1 sub dup 1 lt exch /CumulativePageCount get add exch} bind def + /FirstPage { 1 CumulativePageCount add //false } def + /LastPage { pdfpagecount CumulativePageCount add //false } def + /NextPage { counttomark 2 add index pdfpagenumber 1 add dup pdfpagecount gt exch CumulativePageCount add exch} bind def + /PrevPage { counttomark 2 add index pdfpagenumber 1 sub dup 1 lt exch CumulativePageCount add exch} bind def end readonly def % <pagedict> <annotdict> -proc- - /annottypes 5 dict dup begin |