From 9e59fe5cbd2d8d2eb3abb95254ead13c5334bad2 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Sat, 11 Jun 2016 23:05:59 +0000 Subject: mcf2graph (11jun16) git-svn-id: svn://tug.org/texlive/trunk@41368 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) (limited to 'Master/texmf-dist/metapost') diff --git a/Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf b/Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf index 16bff0230c9..55e36475bd2 100644 --- a/Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf +++ b/Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf @@ -1,5 +1,5 @@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% mcf2graph ver 3.92 Copyright (c) 2013-2016 Akira Yamaji +% mcf2graph ver 3.93 Copyright (c) 2013-2016 Akira Yamaji % % Permission is hereby granted, free of charge, to any person obtaining a copy of this software % and associated documentation files (the "Software"), to deal in the Software without restriction, @@ -30,7 +30,7 @@ % Set output checklist : mpost -s ahlength=2 FILENAME %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% tracingstats:=1; -message " This is mcf2graph ver 3.9 2016.5"; +message " This is mcf2graph ver 3.9 2016.6"; %------------------------------------------------------------------------------------------------- pair posB[],posA[],pairT,Ls,Le,pairA; numeric angB[],angA[],br_ang[],sB[],eB[],f_FON[],atom_w[],atom_h[],atom_d[],strA[],stkB[],stkA[], @@ -125,7 +125,11 @@ def beginfont(text s)= enddef; %------------------------------------------------------------------------------------------------- def endfont= - if sw_font_frame=1: AUX(0,0)(draw_frame(font_wd,font_ht,(0,0),0.2pt);) fi + if (sw_font_frame=1)or(sw_font_frame=3): + AUX(0,0)(draw_frame(font_wd,font_ht,(0,0),0.2pt);) fi + if (sw_font_frame=2)or(sw_font_frame=3): + AUX(0,0)(draw_frame(font_wd-2margin_left_right,font_ht-2margin_top_bottom, + (margin_left_right,margin_top_bottom),0.2pt);) fi if (sw_auxout=1)or(sw_checklist=1)or(sw_MOLout=1): mol_check; fi if sw_auxout=1: auxfile_out; fi if sw_checklist=1: checklist_out; fi -- cgit v1.2.3