1if not modules then modules = { } end modules [ ' back-pdf ' ] = {
2 version = 1 . 001 ,
3 comment = " companion to back-pdf.mkiv " ,
4 author = " Hans Hagen, PRAGMA-ADE, Hasselt NL " ,
5 copyright = " PRAGMA ADE / ConTeXt Development Team " ,
6 license = " see context related readme files "
7}
8
9
10
11
12
13local setmetatableindex = table . setmetatableindex
14
15interfaces . implement {
16 name = " setpdfcompression " ,
17 arguments = { " integer " , " integer " } ,
18 actions = lpdf . setcompression ,
19}
20
21do
22
23 local dummy = function ( ) end
24 local report = logs . reporter ( " backend " )
25
26 local function unavailable ( t , k )
27 report ( " calling unavailable pdf.%s function " , k )
28 t [ k ] = dummy
29 return dummy
30 end
31
32 updaters . register ( " backend.update " , function ( )
33
34
35
36
37
38
39 pdf = {
40 immediateobj = pdf . immediateobj
41 }
42 setmetatableindex ( pdf , unavailable )
43 end )
44
45end
46
47backends . install ( " pdf " )
48 |