15 lines
322 B
PostScript
15 lines
322 B
PostScript
|
/box-table-cell-fake-create {
|
||
|
|
box-table-cell-create
|
||
|
|
dup box-table-cell-fake-setup-methods
|
||
|
|
dup /box-table-cell-fake add-type
|
||
|
|
} def
|
||
|
|
|
||
|
|
/box-table-cell-fake-setup-methods {
|
||
|
|
dup /Methods get
|
||
|
|
dup /show {box-table-cell-fake-show} put
|
||
|
|
pop pop
|
||
|
|
} def
|
||
|
|
|
||
|
|
/box-table-cell-fake-show { % => Viewport Cell
|
||
|
|
pop pop
|
||
|
|
} def
|