From 08c6d558b97ca9a2db473bcbb6f0a92ba03f591f Mon Sep 17 00:00:00 2001 From: Kritika Verma <95202116+SunSummoner@users.noreply.github.com> Date: Fri, 4 Oct 2024 02:17:59 +0530 Subject: [PATCH] Binding for 'tags' and 'fields_metadata' in job_status_emails.R --- R/.RData | Bin 0 -> 7230 bytes R/job_status_emails.R | 8 ++++---- 2 files changed, 4 insertions(+), 4 deletions(-) create mode 100644 R/.RData diff --git a/R/.RData b/R/.RData new file mode 100644 index 0000000000000000000000000000000000000000..3fe704d7ddb49ac6374c89303dc7ad3ddae4e557 GIT binary patch literal 7230 zcmV-E9KqusiwFP!000002Gu+VSQOXRLuX+TG$JaB!-}vgOA!QO&Yjr-VI$x7 z{{6n;_H)micF#R?FRA@TM!Jo3!!XPNb9AKsI#F57X;^yykZ25Zw5JMom?I{lQqNq{ zkTF4%l~F+I^+Ya-Va^V`F3x(LLPzFMU_7XjtGNZkT2fC3ByR_w4!qGW)aV?giULek z(7%VgE>0??n$%MnFSgQgDGxC`HU!Txsuc#MMlA*P*-D)p*DBQ+%4|6fDs-gYs50m? zj5?JZCksinA;VCtCFQt6qc)He4KjR^8&3T?;##9hg&XonTu&NsO%6`za`kwTPH8ZZ zYTTf~DbQg6BB&27E}+2aHFyyTM=J<5HBg<6D-F0(ZH7Y@5K5J~nHdJqEhY+7F)=!l z$j$&+DIi0rmN4Y8_)E}fBr+KXMutkMH<;gBqbne2YJhqvlcBpqw6aM9sVkr;i5KN5 z6?wRUEYPY50|{Qps3-9(LQiJn8i+6;4-Uv<9<9v5r7XqpxHw#*HxN35grOPuSpZTP zNy4%T0})1%oFsILys!y6qEM+Kvcd{9DzZ?c%FruxO07X3#thP%32FwKVWt+p9GYjK zC}5tf1SeG#!U9N9RDatjQ6Le7EG27n*je=kjaDidq%I^>%4~#`6uJ|&q{2XvImrBG zLAXYT2T?GCWHGn|6-t_OB`E&@j{s{537sC#(P;{BB1=<9kwHCyhN)CjoFq7W%_Y^O z&YY(P<|x&KiWWs2$h#RXqCEx50y0BOp(VAviI&hC$Z)m{e&EH^;T+r+l;U!$7FreY zI7TO}I`DLq>dDty!6B?B#Bs~k-JzmW9bt~sLuM(-*rBv&;S$h0jO96^Svt~S)TyPA zkTSOtH=g-&1$wO}3P`R6GyiJohimQ>DniegJ9}8^4$Y)Oqb;_!oDhVIi8qDCG&2)n zuleQ|ni?wml5f{(MhUcd@)#q~#f_C^fmRntf4T`EX75aQu?Mg44w#*{o}?pbI#RZy z$2m~r98C=&g9R#BZk%A+7v}rIvZKvVoscJ#mpa)Dm4V!hH-jr(XCu_+5K229)aG=Z zjZpm{6hFvGCz$%tPvfBSds}+B7v)iQJ59*-0KX1Mp67Zrd~)-{wAf9;fI6Bb(^6?4 z8v<)B+RoS@q&H_oObl;?BUt=-bs~#b0I}dtEV4KYbfc>Yc0yl9jCv2qDs zI5t#ZW>22CL3i;oS;J=ES(zhL8y82{x(ng%WL_azfK~>=o~Ir-lHy3&)n-8!A&-ie zivF%3dzb{I7P#b2Fz*EG-E5KCW(-M%SnSFy(gI{3-ZYMzwQ%?#7`8UmBM1(Zf7C!R z0Oae0q@9p*qseH2>JC{B(ma^YgJt(75d*P+7>M7N7_<>0a_ZZ6j=3zamv7?w9~=4R z0eJ<|B$!WvWsfG|8?!p2d~5XT%;y`sPJn%d0Pn&ZyVJl}Wvj&+wko(-w*S^Ek!9Z? z(CAF>AOu>(=stp#Oh6xziGD!d%|t&S?`@(VkQbZiN6>?Igl;EFC6UF0w|-p~UD}za zTYP!oTbbD4hdrPDAjA=g@*zI6=;$ zL%~Eh+8uF~Mw5>lwRoPffKcO<>7X{n07YusNvg7OGbA}~MuSSJy*p7z01Klc5g<~k zUac|6@d-u>D`v+_&85c)bv7K06Z#OPp53jPC&(xu4Fvlh<~qH(5|qb`pEA^pjqY4Cb7_0!VckTL-r;bzoKC>}U=cWcR6GPHD1v|w1xCm6ybL!MG^ z!2&lB`G6x30$>uwH9d?s0LC*cpvWg6Ed z3CRZ@7${U9K#Thun#YW>$R+&(Rl?#l3NlA!EQk#0sE(qcgL2fRqw*HK_pWo~{_rA{B%Y$Qc=$8!9)87?E8_s1;;(hDHnCS5FfcMGhzim?o5? zJ|s?uPJoQ-jA}JN-@-!~h``dL=-nxO{$ayN?^>nk*$sp*CLHBA0VJ6%{EtK z)ZtpAPOG7Gkth4C;9KT|#vbY#S3_h1)&f~7R7$R>BTZRS7(KKYTRAR?k;r(`i6F(Z zP$e?!C>v+lVqiWcfGF({+IUCh)Ud zVBQ7RhuaJ_0zv|58<=kc%Mp!*%I_`cKSv^Y0SBsKGu5^4@kV`W)akPeU>hWS$Jfa$ z(Y#7WAmAA5LRumk#=62a&a{pRv^bePBa9nF;dgRnj4Iv6adsUj&0?ibaIfXUla+Uo z^j)OvV6&_MWJNHIfcXfP);2_-RIy}_)N$bQTi%u3Na z@?m)Lwhov@tz-frPAe2dmeo!G16RhI#2OaTL?amZ-FJs6^T7C46L4M( z@y1}vi)Goyd4!_Si4kaXrhRdN7CV1|N*Cy2(@mWPn9aycXFk&%;nzJOL9zO}XZDk6 zfKmvE)4>jYFl$ic45a=@>W`E?Y?hK{P%1#$9_HJ_aEjs@%+0|f?F--W;c_| zSPm(@5mdZcGTMepUA7_$K`|KSy-Wh4QXu$Oe{=o zin7#Y78s%P=BYaS-7GYfP-kljLiHpGzKc`X*;DSM^eZaww)^6xsERqe-fJ~&?^g#C zW+DA>)4xrRuPyN%~{s(H*44J z?H+!t>VxspgAswj{Pk@LONormuAz9@MxMZa$C*-M#^^y%d<{YLb(>p$dN zc#kW$U%hi!+qYG>rDd^mf1c&N&?Rzx@AKaUIM^qi^#AbkKCe#(gx)=t{Ogj+6T!h% zK2O>%?zZe)V$Qt({_D)1?V=meNzVfMtxAjk?e*msUQZV#?eJSG9e64!A-1Qe=s%}N z#b3_5HEqs9d8)Mez)rLFf7^5WuQd~1W%tkgWZkMWt6%S%zxUDdaox`>cyg=Ll$7^- zZQP!4aNVXSDSZ@&^=a{;^KbW#+Bx1bwqo|1s;p$ zzuH(^=~uYZH*)6Zk0%E{zw>3yz(c`j3(Kz6ey3>>dU@lhk}YM&t~q}2`p*HSUoLL{ z)xG$#`2mG77pE@%Xzr~~GaLt#*L+KsY4MC+pVbDm?$Wy5@C(@^R{ZnH&Q>C9?w+1s zjKkdw$4s~P#XZuj7;t1w_w)H!xY^-Dt7=%c?aX*aV)c!zb(#u`77 zh{VM|IbN!2dvy1uB{AKX%LktSvSmQ)u=|rH{c!76n|9TU%Kd(RI{fPgn~%4=x8Z|3 zLCsn`FIvC)!R#Tq#Y-OU9ymXu>xxOrr8}=IxH_{#mnq{CMmb*`-Dlpie>+5O+dJ}j z=F_%QFHgQTe%RRP^*64M8KVjMdBX7zW5utRoEz%1aEO!k#GML%qig9X*{x5z?>X|* z^d(;3JUH*~>f3LM``O2{Zft%qXXo9sZE_NR9BtQ2e&Vy&qsni0*zFqI)!0k--i~DL zjHrr$eY#(wf3K}rDsrx@j>)L52y?A1`_oH3{nWFmd;N~Ci`6&R&I?*mD|vnQwyXAh zh&X3W>@uQkON-D0?@W!F7T7Xxe67?aWp_+|_dC^F3ZqrqToSvMBpxo+`Is_~pY=>i zb^7CiN4oneXRK%W?#(x5pPQtr@Ec&K8y~dzz9Ma8zks_}N4oia9FtfyRQuz8aqJ@H z)|Q7}b*t=9R(qk($l%GML6z0^YtF55Sdl3${pbg=N9RcuyG0=pQN_gG?_VzMdOA&W z=u}tvt}A4hd9TXm-#+`v+Vt8v+e&4`ete^of7PKmYc7nqG`w=XYNB+<$IcrU^qf}_ z{M{E1dp+9}UbAiW>W>3&?wp#jWOV%H_4A$=jhHO`U{*`7C{v%d7km=1Pp=uLz%zg0I{RlZuY zG4bKP!pT!Tr<{6pea8DUhingynPcppvdey#>hoiV%KWG7OC5jU+J!yk!>de(Ppy1V z;xpZD%)e^xDQa&ITDvlK%D%Nax9tXPS=O0=4!6srciz#q^`5@A`kR@{Vn_V3tZeS! zfzvl#nX-4v{8_PQVshqvb>)I&N#I0R!}4Xb6E~e`7hK_1D$A>$D#=^jQg*jk`dPEl zF^78^s=rxrLRDj@-gf1Ofh{g|o^fH9U&pHO$8i@FJ?$mF@7vYa?mi#;pr-m^ z`yI#bm#Xje8@l+PBNKx^j#*k7dcR$pc@^V3q_!M%IKA?Apds^yXWZnegT1P^T|XeH zEjwSXbogL)_eGypOqWlNaDN=s`?sy>(ITG^uL5q-{W^}`lM^p91~IGl1Q{N$<)oBIx&ePD}tWoY!d3r;UmUoQ8W z`d8b*>8;O^HTe<$e6jV_k(7Z;RPvo7k-=Z`q;#y`vCPNg*3Pbe{511F?U!B(!S9#< zhp4D}75C*U`4>NK8U9#3-fsCF@zdKA{~Vs`eLcEUGq2Tq9YV(rpK;c$@8aEGoGI;` z^6s8Pb~|o8sO+#?F|FJ7?9utpN)Ij{l6&>uA6+(GtSSuJVl3NSdvT4&g%_KrxBDco z^>0P}4_yD|FUjTVVXjwZN8D+36RYz4_(o3Vdt;I=kJ*^_Y{aga(=Tcqw|@P+BrwoV{7+o-aQ-Sdt$YBD<6SYVqj#C$G0w=v32kTD>1x-hXC# z>V>MT`oc!e^u`P z%k|r#_g0_Qhi46zKfx=eR<*kMI@6`Y7e9Z$UYuqZfBO4!`Ek1)B{I{EybgqfemUi>JRGi2tEmNWizH$uGk*)3et6?3OtB<%J^=Ro~1U zG5X@etf5gJGuj-y_aIb)zZ0AGQ}m_{UB--9=aIb9`|wY-r$os|Cg$TuTkll7*p==T z9guY6V!ZO#&$K5eZo6A~qtZR(AAek35$`|GzuUEyrQ$0-N!z?1J-pKEhg12d9vm)t zaw@Xc;iBewVsBCVtkR*i)o0w6Jl7pp2B*F%U3NbC*2S4^c?kx%nU+6c=dvMjv zDA5*-TTUu=j*jBAo9r!tHbtn9ztTi(lL4F8ya%%{7r|Duu7phIp-wU z+abJ*9N-2Kyt$E9tPjm44WznID(RDumY6XtHAy1JjcRbCDh`+A84TK(Fv~H+P>n8^ zIciv_3zNv0qXY1>FZ`0sOd!W4y>xLB_Ij5jP#c%0DImcOssEL4!Xmg4=Wx`Oc?FCc z3~^%#Ca^_uWk|@6C7bEV>+DxQZCOO?jSPTI&2S_gj+BwlguNOU89=XGM8SL%EIT$9 zD!;d2WWWi@3#dcGW~wu=jO;CY3+*i(C^4n0MMBLkP;4>IR*=JDZ*Y?^10Jb181?i4 z+j?vO2n{A9dFG{)8*T&K7YR9hL77ubH_+EBIrl9Eu2)iOpFAuni9Np<(%2t6 z4yVk47Vi>@XBm~MZ1##Jt~X|Z+i>OsKIVDV2L0cf&g$}{`C2HP z)Ejh03Rys7aMl$rOE_f?>1&Xnfkw}AvX!@V2`y<-dI;x=tX8MVHY!M*z}dsIv|KUQ zBrOxNCvJhLF{k4BS1NgTl-Z@zrVGman}=^fg(5=ftIDhf6)FjH6)5NcrxX-AZ$pJB z;VdL|SsHMNPGdA^jRtx~T0hNl3EKhXq^JjxHY7bIV|Zd}pP^}qh!@dC21L9ILJ^<< zRs)AoYiD1s|G|vpoM0}>Bh|PO927Lavm7rXaWzSa03{CKLO2jOg9hFU*HO4Khg5;E zAaL{r=Jhu=Pop=)$HZziIzznB*+t5P0&_wb0NQ3Drh0-ye-Yi}=2LunYH6UvozQF4 z7M7&qMM?@6LaU`J(6fe=&C4Z}YO^>NkwH`+z*nP|J_8vO(JcmmwVZ5J(s~+7Whg-) zvgOSEbsAhAQE0wEtjHr3`4CA%kRISnp-0O+AQz2?1^dv@Q0q6PbROt|`RypqTJa|> zEh!^qXllAd;HV*BC_3JsGHDUrBvz+%=`N5hh*^WYpjdA;?ZBaF)Rg8kiERVww$AoHZ(mLlOohNqA>4DMrWP z3eK9&>%puTahwH&+owRE3)*Q@$2+{P&IM~H#XO){5}`(oma?UB=Hso_r>Bh+xxpEW z2EP&bQH;?SX>{2_gHjUG(nbtT?I+=$KjuLJc2}oS)rl5hc^WMUaa_T$#)h$NaU4@u z*9COpB^KH!poBa-m90?+85nCt$qBqc0YnIxAwjFtcNnG6fEtWB%OX_y)Ou#X)6x@C z)6DNQxt67n@1WoD~J>V3;4w zwlx9CMVR#oVbR|uxz+IoF}f~bRzVyN=!KKdueL%YZo=E`Zphs6CWOs(^!G*j+rhjmIu3!!D7LsB zcs#2F9YeMsD`rx*vNeK4f)K&PXtac8Lm$wu8R*mNKF0hQgoNrFV7cm?--8o$u@M0w zJ#yqZ8c|3Zg_Qkl)+2BrRRq%rjJ?GaNIy10m16Ae8WHkH={g&shCwKCJg8xGT@&bh zJZ7!)@o#;Fc1J=n4U#k_d{n>KvL_7v;TM@fLLluUy453r_B^gikW_+{r8aXFtS25Y z9R>5FU|H5ATxD*UVHkU4zVln>ss|@J!gdr~j$L3V?G5Y~S$5qB+tChoF$kv{vr2b{ zfSA+^DL0xn7O26HpCBCo^8+x;Ws4@@En{&|-Zt9e)WzGuZ}O^aW#b!GZ5B&9FoId@ zxGNKE;sq=mLAa?NRNUCu6H8^*HW)O#dF&K4kVKO}cNfbpqrZvQHpfsJ#@f?Pi=m6S0VR`XxqEF;Z^yI%a{|2V-}~=sMhou4@9VW`Zji#;(JS4zARt z)k#R*5C|#R)L6k83P+@vtQF)RCRQU-O{^M>G;xJuRDHAZjRqJn+Ej;NAVvg7U(?e5 Mf9nO(84z0l0M=+2yZ`_I literal 0 HcmV?d00001 diff --git a/R/job_status_emails.R b/R/job_status_emails.R index 4a96459a..7ac9f121 100644 --- a/R/job_status_emails.R +++ b/R/job_status_emails.R @@ -95,10 +95,10 @@ make_job_results_url <- function( #' } format_job_args <- function(job_args) { # format job arguments into html-formatted key/value pairs - job_args_list <- tags$ul(lapply(names(job_args), function(key) { + job_args_list <- .data$tags$ul(lapply(names(job_args), function(key) { # look up human labels for field names, values, if available # (if not, just use the keys and values as-is) - field_meta <- fields_metadata[[key]] + field_meta <- .data$fields_metadata[[key]] human_key <- tryCatch( { toString( @@ -136,8 +136,8 @@ format_job_args <- function(job_args) { # which works fine for our purposes. human_value <- toString(lapply(value, humanize_value)) - tags$li( - tags$b(paste0(human_key, ":")), + .data$tags$li( + .data$tags$b(paste0(human_key, ":")), human_value ) }))