From cc209e17295e7e78bf1b685cdaeb6037bb938a27 Mon Sep 17 00:00:00 2001 From: Hans Hagen Date: Thu, 15 Sep 2011 09:08:00 +0200 Subject: beta 2011.09.15 09:08 --- metapost/context/base/mp-tool.mp | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'metapost') diff --git a/metapost/context/base/mp-tool.mp b/metapost/context/base/mp-tool.mp index 480d9d186..35eca4727 100644 --- a/metapost/context/base/mp-tool.mp +++ b/metapost/context/base/mp-tool.mp @@ -846,15 +846,15 @@ vardef bottomboundary primary p = if pair p : p else : (llcorner p -- lrcorner p) fi enddef ; -vardef rightboundary primary p = +vardef rightboundary primary p = if pair p : p else : (lrcorner p -- urcorner p) fi enddef ; -vardef topboundary primary p = +vardef topboundary primary p = if pair p : p else : (urcorner p -- ulcorner p) fi enddef ; -vardef leftboundary primary p = +vardef leftboundary primary p = if pair p : p else : (ulcorner p -- llcorner p) fi enddef ; @@ -2250,7 +2250,7 @@ vardef simplified expr p = (reverse dostraightened(+1,dostraightened(+1,reverse p))) enddef ; -vardef unspiked expr p = +vardef unspiked expr p = (reverse dostraightened(-1,dostraightened(-1,reverse p))) enddef ; -- cgit v1.2.3