expkg-zone58/pdfbox
1
0
Fork 0
Code Activity Actions

[mod] ci
Some checks failed
Run BaseX Tests / test (push) Has been cancelled
Details

Browse source
This commit is contained in:
Andy Bunce 2025-01-31 21:13:52 +00:00
parent 87c0a1611e
commit a861c7e90c
5 changed files with 25 additions and 15 deletions
Download patch file Download diff file Expand all files Collapse all files

14
src/test/test.xqm
View file

@ -10,7 +10,7 @@ declare variable $test:base:=file:base-dir()=>file:parent()=>file:parent();
declare %unit:test
function test:pdfbox-version(){
let $v:= pdfbox:version()=>trace("VER: ")
return unit:assert-equals($v,"3.0.4")
return unit:assert-equals($v,"0.1.0+pdfbox3.0.4")
};
declare %unit:test
@ -49,11 +49,12 @@ function test:outline-xml(){
};
declare %unit:test
function test:pagelabels(){
function test:labels(){
let $pdf:=test:pdf("samples.pdf/BaseX100.pdf")
let $labels:=pdfbox:labels($pdf)
let $labels:=pdfbox:labels($pdf)
return (
unit:assert-equals(count($labels),pdfbox:page-count($pdf)),
unit:assert($labels[1]="i") ,
unit:assert($labels[27]="1")
)
@ -74,6 +75,13 @@ let $pdf:=test:pdf("samples.pdf/BaseX100.pdf")
return unit:assert(starts-with($text,"BaseX Documentation"))
};
declare %unit:test
function test:page-image(){
let $pdf:=test:pdf("samples.pdf/BaseX100.pdf")
let $image:=pdfbox:page-image($pdf,0,map{})
return unit:assert(true())
};
declare function test:pdf($file as xs:string)
as item(){
file:resolve-path($file,$test:base)=>pdfbox:open()