changeset 939:b22390c111e9

Use prsubpad(); Increase name display width by one character.
author Matti Hamalainen <ccr@tnsp.org>
date Sun, 22 Mar 2009 00:36:12 +0000
parents b66b00d43029
children 0e79ab258862
files gm-pssmangle.tf
diffstat 1 files changed, 3 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/gm-pssmangle.tf	Sat Mar 21 07:25:22 2009 +0000
+++ b/gm-pssmangle.tf	Sun Mar 22 00:36:12 2009 +0000
@@ -46,12 +46,11 @@
 	/elseif (_gp_pl=~"form"|_gp_pl=~"mbr"|_gp_pl=~"rest")\
 		/let tmpc=@{Cmagenta}%;\
 	/elseif (_gp_i=~"*") /let tmpc=@{BCblue}%;/else /let tmpc=@{BCwhite}%;/endif%;\
-	/let tmps=$[substr(_gp_s,0,8)]%;\
-	/return "%{tmpc}$[pad(tmps,8)]@{n}@{Cblue}:@{n}$[gparty_val(_gp_hp,_gp_hpm)]@{Cblue}:@{n}$[gparty_val(_gp_sp,_gp_spm)]@{Cblue}:@{n}$[gparty_val(_gp_ep,_gp_epm)]"
+	/return "%{tmpc}$[prsubpad(_gp_s,9)]@{n}@{Cblue}:@{n}$[gparty_val(_gp_hp,_gp_hpm)]@{Cblue}:@{n}$[gparty_val(_gp_sp,_gp_spm)]@{Cblue}:@{n}$[gparty_val(_gp_ep,_gp_epm)]"
 
 
 /def -i gparty_show =\
-	/echo ,-----------------------------------------------------------------------.%;\
+	/echo ,--------------------------------------------------------------------------.%;\
 	/msw |$[gparty_sc(1,1)]|$[gparty_sc(1,2)]|$[gparty_sc(1,3)]|%;\
 	/if (gparty_row2 | gparty_row3 | opt_fullparty=~"on")\
 	/msw |$[gparty_sc(2,1)]|$[gparty_sc(2,2)]|$[gparty_sc(2,3)]|%;\
@@ -59,7 +58,7 @@
 	/msw |$[gparty_sc(3,1)]|$[gparty_sc(3,2)]|$[gparty_sc(3,3)]|%;\
 	/endif%;\
 	/endif%;\
-	/echo `-----------------------------------------------------------------------'
+	/echo `--------------------------------------------------------------------------'
 
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;