diff options
| author | Hans Hagen <pragma@wxs.nl> | 2002-05-15 00:00:00 +0200 |
|---|---|---|
| committer | Hans Hagen <pragma@wxs.nl> | 2002-05-15 00:00:00 +0200 |
| commit | eec06cd3ed759e8101b6cafa16d46884e479a4f6 (patch) | |
| tree | 07d5af570abdb3dd80d37e74bba1a0759855557d /metapost | |
| parent | 64f02e3e5cbd20af19a0089553db5ee5c7d5eca1 (diff) | |
| download | context-eec06cd3ed759e8101b6cafa16d46884e479a4f6.tar.gz | |
stable 2002.05.15
Diffstat (limited to 'metapost')
| -rw-r--r-- | metapost/context/mp-tool.mp | 11 |
1 files changed, 9 insertions, 2 deletions
diff --git a/metapost/context/mp-tool.mp b/metapost/context/mp-tool.mp index e24bd45e9..1c8dc83f2 100644 --- a/metapost/context/mp-tool.mp +++ b/metapost/context/mp-tool.mp @@ -1732,11 +1732,18 @@ enddef ; % handy vardef bbwidth (expr p) = - (if known p : xpart (lrcorner p - llcorner p) else : 0 fi) + (if known p : + if path p or picture p : + xpart (lrcorner p - llcorner p) + else : 0 fi else : 0 + fi ) enddef ; vardef bbheight (expr p) = - (if known p : ypart (urcorner p - lrcorner p) else : 0 fi) + (if known p : if path p or picture p : + ypart (urcorner p - lrcorner p) + else : 0 fi else : 0 + fi) enddef ; color nocolor ; numeric noline ; % both unknown signals |