diff options
| author | Hans Hagen <pragma@wxs.nl> | 2022-04-19 20:58:40 +0200 |
|---|---|---|
| committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2022-04-19 20:58:40 +0200 |
| commit | b9a7e870cf47674c90331b41f9267768992b49cb (patch) | |
| tree | 7b7bb2ee92af1767712ffcfbec47995c8894e214 /tex/context/base/mkxl/meta-ini.mkxl | |
| parent | b155eafa1e2d73692eed08ecabeb5ad589ac11dc (diff) | |
| download | context-b9a7e870cf47674c90331b41f9267768992b49cb.tar.gz | |
2022-04-19 19:52:00
Diffstat (limited to 'tex/context/base/mkxl/meta-ini.mkxl')
| -rw-r--r-- | tex/context/base/mkxl/meta-ini.mkxl | 17 |
1 files changed, 13 insertions, 4 deletions
diff --git a/tex/context/base/mkxl/meta-ini.mkxl b/tex/context/base/mkxl/meta-ini.mkxl index 82cf516c2..86eaea3ae 100644 --- a/tex/context/base/mkxl/meta-ini.mkxl +++ b/tex/context/base/mkxl/meta-ini.mkxl @@ -1012,9 +1012,17 @@ %D This one is not optimized because it's only used for small snippets, if it %D is used at all. +%D +%D \starttyping +%D test \MPcode {draw unitcircle scaled 1.5ExHeight} test test \MPcode [doublefun] +%D {draw unitcircle scaled 3mm shifted (0,-1mm)} test +%D \stoptyping -\permanent\tolerant\protected\def\MPcode#=#:#*#=% - {\ifparameter#1\or +\permanent\tolerant\protected\def\MPcode[#1]#:#2% + {\dontleavehmode + \begingroup + \obeyMPboxdepth + \ifparameter#1\or \meta_begin_graphic_group{#1}% \meta_enable_include \meta_process_graphic{#2}% @@ -1022,8 +1030,9 @@ \else \let\currentMPinstance\defaultMPinstance \meta_enable_include - \meta_process_graphic{#1}% - \fi} + \meta_process_graphic{#2}% + \fi + \endgroup} % a bit nasty (also needed for compatibility: |