From bafe29de59fdc2a37922e198aebc9b04f518f152 Mon Sep 17 00:00:00 2001 From: Context Git Mirror Bot Date: Sat, 13 Jun 2015 10:15:03 +0200 Subject: 2015-06-13 09:54:00 --- metapost/context/base/mp-mlib.mpiv | 13 +++++++++++++ 1 file changed, 13 insertions(+) (limited to 'metapost') diff --git a/metapost/context/base/mp-mlib.mpiv b/metapost/context/base/mp-mlib.mpiv index 6d4894fb6..94377e52d 100644 --- a/metapost/context/base/mp-mlib.mpiv +++ b/metapost/context/base/mp-mlib.mpiv @@ -768,6 +768,8 @@ vardef mfun_do_outline_text_flush (expr kind, n, x, y) (text t) = mfun_do_outline_text_b (n, x, y) (t) elseif kind = "r" : mfun_do_outline_text_r (n, x, y) (t) + elseif kind = "p" : + mfun_do_outline_text_p (n, x, y) (t) else : mfun_do_outline_text_n (n, x, y) (t) fi ; @@ -793,6 +795,12 @@ vardef mfun_do_outline_text_d (expr n, x, y) (text t) = endfor ; enddef ; +vardef mfun_do_outline_text_p (expr n, x, y) (text t) = + for i=t : + draw i shifted(x,y) ; + endfor ; +enddef ; + vardef mfun_do_outline_text_b (expr n, x, y) (text t) = mfun_do_outline_n := 0 ; for i=t : @@ -857,6 +865,9 @@ vardef mfun_do_outline_text_set_n text r = def mfun_do_outline_options_r = r enddef ; enddef ; +vardef mfun_do_outline_text_set_p = +enddef ; + def mfun_do_outline_options_d = enddef ; def mfun_do_outline_options_f = enddef ; def mfun_do_outline_options_r = enddef ; @@ -882,6 +893,8 @@ vardef outlinetext@# (expr t) text rest = mfun_do_outline_text_set_b rest ; elseif kind = "r" : mfun_do_outline_text_set_r rest ; + elseif kind = "p" : + mfun_do_outline_text_set_p ; else : mfun_do_outline_text_set_n rest ; fi ; -- cgit v1.2.3