diff options
| author | Ravi Nanavati <ravi@bluespec.com> | 2006-09-29 22:47:39 +0000 |
|---|---|---|
| committer | Ravi Nanavati <ravi@bluespec.com> | 2006-09-29 22:47:39 +0000 |
| commit | 138de4239c816531feebc8dcc478995d984276a9 (patch) | |
| tree | 0702faf972c1f57ed4197ea8eda0d529976c89a4 /utils/hp2ps/Dimensions.c | |
| parent | 9cd54893c0097b5b763dc9657e3c228492cdb87f (diff) | |
| download | haskell-138de4239c816531feebc8dcc478995d984276a9.tar.gz | |
multipage_hp2ps
Add support for splitting the key index over multiple pages in hp2ps
Multipage support can be requested with the -M command-line flag
or inferred if the number of bands requested is greater than 20
(the limit on the number of bands displayed has been removed)
Please include this change in the 6.6 branch as well as HEAD
Diffstat (limited to 'utils/hp2ps/Dimensions.c')
| -rw-r--r-- | utils/hp2ps/Dimensions.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/utils/hp2ps/Dimensions.c b/utils/hp2ps/Dimensions.c index e732402dac..4b4aadb101 100644 --- a/utils/hp2ps/Dimensions.c +++ b/utils/hp2ps/Dimensions.c @@ -51,7 +51,8 @@ Dimensions() titleheight = TITLE_HEIGHT; } - graphwidth = titlewidth - graphx0 - (TWENTY ? KeyWidth() : 0); + boolish keyOnGraph = !multipageflag && TWENTY != 0; + graphwidth = titlewidth - graphx0 - (keyOnGraph ? KeyWidth() : 0); graphheight = borderheight - titleheight - (2 * borderspace) - graphy0; } |