From e0e3ed2de96caf76d1065b834ddd4f9ba62a1e55 Mon Sep 17 00:00:00 2001 From: Marius Date: Thu, 16 Feb 2012 11:20:24 +0200 Subject: beta 2012.02.16 09:55 --- metapost/context/base/mp-core.mpiv | 15 +++++++++++++++ 1 file changed, 15 insertions(+) (limited to 'metapost/context/base/mp-core.mpiv') diff --git a/metapost/context/base/mp-core.mpiv b/metapost/context/base/mp-core.mpiv index 25ad04abb..509801b02 100644 --- a/metapost/context/base/mp-core.mpiv +++ b/metapost/context/base/mp-core.mpiv @@ -390,6 +390,21 @@ def prepare_multi_pars (expr fn,fx,fy,fw,fh,fd, last_multi_par_shift := origin ; +% save _tx_, _ty_, _fx_, _fy_ ; +% if use_multi_par_region : +% _fx_ := fx ; %min(xpart ulcorner RegionTextArea,fx) ; +% _fy_ := fy ; %min(xpart ulcorner RegionTextArea,fy) ; +% _tx_ := min(xpart lrcorner RegionTextArea,tx) ; +% _ty_ := min(xpart lrcorner RegionTextArea,ty) ; +% else : +% _fx_ := fx ; +% _fy_ := fy ; +% _tx_ := tx ; +% _ty_ := ty ; +% fi ; + +% numeric fpos ; fpos := 1 ; initialize_box_pos(fpos,fn,_fx_,_fy_,fw,fh,fd) ; +% numeric tpos ; tpos := 2 ; initialize_box_pos(tpos,tn,_tx_,_ty_,tw,th,td) ; numeric fpos ; fpos := 1 ; initialize_box_pos(fpos,fn,fx,fy,fw,fh,fd) ; numeric tpos ; tpos := 2 ; initialize_box_pos(tpos,tn,tx,ty,tw,th,td) ; numeric wpos ; wpos := 3 ; initialize_box_pos(wpos,wn,wx,wy,ww,wh,wd) ; -- cgit v1.2.3