#!/bin/sh # MetaCard 2.4 stack # The following is not ASCII text, # so now would be a good time to q out of more exec mc $0 "$@" Delete Prop Patch2 x,"Anti Delete Custom Property Patch ULucida Grande ULucida Grande WLucida Grande UGeorgiaUGeorgia cREVGeneral bookmarks handlerList tempScript prevHandlerscript Pon preOpenStack set the loc of this stack to the screenloc set the style of this stack to modeless end preOpenStack --------------------------------- on openStack switch case the script of btn "Delete Key" of cd "revCustomProperties" of stack "revTemplatePalette" = the script of btn "NewScript" answer info "This patch has been already applied." as sheet disable btn "Apply Patch" break default enable btn "Apply Patch" end switch end openStack , cREVGeneralscriptChecksum쫑Nm%Ƒh bookmarks handlerListpreOpenStack openStackscriptSelectionchar 398 to 397 prevHandler openStack tempScriptscript

on preOpenStack

set the loc of this stack to the screenloc

set the style of this stack to modeless

end preOpenStack

---------------------------------

on openStack

switch

case the script of btn "Delete Key" of cd "revCustomProperties" of stack "revTemplatePalette" = the script of btn "NewScript"

answer info "This patch has been already applied." as sheet

disable btn "Apply Patch"

break

default

enable btn "Apply Patch"

end switch

end openStack

 NewScriptEpon mouseUp set the caseSensitive to true put the hilitedLines of fld "customkeys" into tLineNo put line tLineNo of fld "customkeys" into tName if the number of words in tName is 0 then exit mouseUp if the optionKey is not down then answer warning "Really delete property" && quote & tname & quote & "?" with "Cancel" or "Delete" if it is "Cancel" then exit mouseUp end if put the label of btn "customPropertySet" into tSet put revPaletteObjects() into tObject set the wholeMatches to true if tSet is "customKeys" then put the customKeys of tObject into tKeys delete line lineOffset(tName,tKeys) of tKeys set the customKeys of tObject to tKeys else put the customKeys[tSet] of tObject into tKeys delete line lineOffset(tName,tKeys) of tKeys set the customKeys[tSet] of tObject to tKeys end if put revCustomPropertyFilter(tKeys) into tKeys if charToNum(last char of tKeys) is 10 then delete last char of tKeys sort lines of tKeys put tKeys into fld "customkeys" subtract 1 from tLineNo set the hilitedLines of fld "customkeys" to tLineNo send "ShowCustomKeyValue" to fld "customkeys" end mouseUp ----------- -- Patched version So smart Software 2005 ^R cREVGeneralscriptChecksumǰ݃$ bookmarks revUniqueID 1109925894429 handlerListmouseUpscriptSelectionchar 1183 to 1182 prevHandlerarrowKey tempScriptscript

on mouseUp

set the caseSensitive to true

put the hilitedLines of fld "customkeys" into tLineNo

put line tLineNo of fld "customkeys" into tName

if the number of words in tName is 0 then exit mouseUp

if the optionKey is not down then

answer warning "Really delete property" && quote & tname & quote & "?" with "Cancel" or "Delete"

if it is "Cancel" then exit mouseUp

end if

put the label of btn "customPropertySet" into tSet

put revPaletteObjects() into tObject

set the wholeMatches to true

if tSet is "customKeys" then

put the customKeys of tObject into tKeys

delete line lineOffset(tName,tKeys) of tKeys

set the customKeys of tObject to tKeys

else

put the customKeys[tSet] of tObject into tKeys

delete line lineOffset(tName,tKeys) of tKeys

set the customKeys[tSet] of tObject to tKeys

end if

put revCustomPropertyFilter(tKeys) into tKeys

if charToNum(last char of tKeys) is 10 then delete last char of tKeys

sort lines of tKeys

put tKeys into fld "customkeys"

subtract 1 from tLineNo

set the hilitedLines of fld "customkeys" to tLineNo

send "ShowCustomKeyValue" to fld "customkeys"

end mouseUp

-----------

-- Patched version So smart Software 2005

 Apply PatchEp)on mouseUp local tCurPath,tSavePath,tFileType ----- set the script of btn "Delete Key" of cd "revCustomProperties" of stack "revTemplatePalette" to the script of btn "NewScript" save stack "revTemplatePalette" disable me answer info "The patch has been applied." as sheet end mouseUp d cREVGeneralscriptChecksum_yDʴ4+j_ revUniqueID 1109926194716 bookmarks handlerListmouseUp tempScript prevHandlerarrowKeyscriptSelectionchar 284 to 283scriptN

on mouseUp

local tCurPath,tSavePath,tFileType

-----

set the script of btn "Delete Key" of cd "revCustomProperties" of stack "revTemplatePalette" to the script of btn "NewScript"

save stack "revTemplatePalette"

disable me

answer info "The patch has been applied." as sheet

end mouseUp

Info ` (| cREVGeneral bookmarks revUniqueID 1109926471772 handlerList prevHandler tempScriptscript  ~In the properties inspector, when you select a custom property and click on the trash button, a confirmation dialog shows up. @ @ @5 @P @\! LYou can click on the "Cancel" button but the custom property is deleted :-( @K Bugzilla 3251 on 12/02/2005 @ =This patch corrects this tedious behaviour due to a typo :-) As usual, the use of this software acknowledges that you hereby release me from any liability for any damages, whether direct or indirect and bla and bla and bla But here it is :-) @ SSS.png  Hon mouseDown revGoUrl "http://www.sosmartsoftware.com" end mouseDown "-PNG  IHDR". pHYs.#.#x?v 9iCCPPhotoshop ICC profilexڝwTTϽwz0z.0. Qf Ml@DEHb!(`HPb0dFJ|yyǽgs{.$O./ 'z8WGбx0Y驾A@$/7z HeOOҬT_lN:K"N3"$F/JPrb[䥟}Qd[Sl1x{#bG\NoX3I[ql2$ 8xtrp/8 pCfq.Knjm͠{r28?.)ɩL^6g,qm"[Z[Z~Q7%" 3R`̊j[~: w!$E}kyhyRm333: }=#vʉe tqX)I)B>== <8Xȉ9yP:8p΍Lg kk Ѐ$t!0V87`ɀ2A. @JPA#h'@8 .: ``a!2D!UH 2 dA>P ECqB**Z:]B=h~L2  5pN:|ó@ QC !H,G6 H9R ]H/r Aw( Q(OTJCm@*QGQ-(j MF+ 6h/*t:].G7Зw7 Xa<1:L1s3bXyeb~19 vGĩp+5qy^ oó|= ?'Htv`Ba3BDxHxE$Չ"XAP44077&9$An0;T2421t.54ld+s;# V]=iY9FgM֚k&=%Ō:nc1gcbcfX.}lGv{c)LŖN퉛w/p+/<j$.$%&㒣OdxTԂԑ4i3|o~C:&S@L u[Uo3C3OfIgwdO|;W-wsz 17jl8c͉̈́3+{%lKWr[ $ llGmnacOkE&EEY׾2⫅;K,KhtiN=e²{^-_V^Oo§s]?TWީrjVQ=w}`嚢zԶiו8>k׍ E  [ly邟~_Y53rW򯎼^{7so}x>|쇊z>yzgAMA|Q cHRMz%u0`:o_F"IDATxbax& O?"?z$<@,X< dz,,2{H?Hk4^B˧̌<4i_rD@,hgaӊb:޾zo]ǷDr8 4y6{5ݕ]WMż#٩ƧoZQqm8$Iyon0w 3+ `8 K d+ ,?ۏҟ]xۥW/~g33+?@S_B9.3_823J{;kc :e'HfCqΈ#{x#Sxs`]Ϛ[^>Y5c+?8r2,FF zh(~(M Ѱ狻v%?d|\>}aeE,^%oΦU{ǃ_Tdگ?w>ytfo <"JYղC"%.686lq-dG &pK\j{H@FeoFWwnAςDE|Փg{Y8~#%̅~f^U8]#50Ln>n^>~f[v6&߰ d cvF>H?~ߟ郹,",Z9}WX%ëXDHĄŠ 9J02qrrﳃ_+yop6E[?;3R.QYy844>?ǛGW50s[s|DYޜs%fq-9_KLu~W=\j^n+!a&lgǯ^ӏ]m rB#ǻ? hV.n6%Lz<х ;'￿ ?g{3蟿~/,r6 ~rOmsy9<9'x9 s-RXxծ|:,>̲ܿ?R= w3< 0 C_>;%'o3_?*imcރ?"2BqN.z6UI/"N~|zʲ/Ho_8AII[9Ԟ|d/O^0Q-$*ۻ= ?:Ű̢*'c*fy_ο> ^Q0si.c``_̒NL l [{p H),x]^ F o1ٍ-w}R0XxkqF_bh6^ . f6F Y. M;S.!IΞz+ *rO3߿z:;;El9%5<{{ˣa!0F6q!qNq M ߿,Oمye-d~82ċsɫ }?R\]WɫJEYDMI\XBV^]$L\ҺJj\6_d x }#ǩB__=r{ 73昳ps0+hڙ7}T~˻oya!!#v</^#.+YXUGN?FSHERTYQHXVDWߞ\RP&-<*e|o:ԹDZO\C7VUAqc㗶ɔ2SRS^!ѕ򊼡r2\vont@W޳2.>eͩ\Pvw׾zY-NݛoM7+Iq+Z( V2{sW/~PvKꙟ(wnZ_V!_xDľTbƯ@I]u &vnn:aAJJ}0-{aQf_>\~A>/x a|x]=҆'?X=ۜ\VqIe̩>[g$\be4 KkabEXOH9 ϟqɍO^-V`ʇ{<~y1I 2sps2 }g,,j2 UWUgWĿ630~}go |mĦ#".$"oϸd⃥>_v>AFN~A&HFLOhpIY PW&У O7., ٲ;|e  ,(|w(㷕 ~ մ6岛6mcC  ŋ"Ogw^z`)PK(B ]SLhُn gyf quc|xw铦-Wfh9Ӌn?zzȅ<U6t5J{ʜ&'O;/?_SģNZƯƐ1D#Ey8rD9*{2hl8zi{᧖UqP$(M[QWc 'Ӆn@ȏ>ov7V9:V Ɇ12 QWB`"EkyщYeWާӝwZ\i+7M4+' 6 7J7tAcV3! abF$Lup!5ӭ4ՠn es=>zZ$g?./}<9YS8RGJRpVܩ-M/)=PXT<_1CWMr!lqy[KIE 1A fzY-3W‘W]d7ۑRVͿ h(Tb 69|yfʖ V&%a&'Jt^c N@JXJԎ0yof6>0S'_!à-c0_cFˮ ¶ 2.5 XjS%-X%ԑ0ꀣÝz]m?^8%g*@̶2)x+[V,$p59'>qdI@%˟x/Ⱥ)e9RJ)sRCbN+$ %\w7[:·mwhMNl'bIг܂:m֐kuF]i.w/_ߞo]e3 p ؂_.b,&kWLZSϯ_nlvӓ~K@LTKT]PRV }xuc&G%+v6FQIUVPqyV<<>~z';;0v..Vf&fv6VfV`A痏RQJEME&X@w2(9XW.wLrjɲ&(A[հxUe||RZ*)b< D.N`Q+,'ۤ ԳQxɗ<~}i]`b'lg54`g|}ƉOOE.FB XKl ɻuVGDTT`}yBXvRbgW1P燔vx4v  _vM{Dun` `C73\&vU+_R^;LJן_]>[DLk~5+RigvYJQˏ[̎ZN32;?߿???ٝ;?>|sbҒڞR?>~x!*h/|&xwoJDX̎[cƒ+_ X'*fZ+k”WCּs Ý _=l>$ٹ#WTOGOGp[`0W'=?Ǡw\"zi+'Z{7Μ r7/_ZAˋfeTxoW@Ps&on?MM(WT ֥y E 6!ßon7?ҿ?>zr[ Ƿ7?y򆘦<^\۽bꅅ Wuov>ZBݩ>SV'_]:2@W_?6Zd~|t󯰲S_:w5w~O_7;GL7H^츹kfamo>xtv!޳+O=`F`]7^\9xɉ-o8ee~¯oo iWԿ=4!MU3A~1?@KOa}`~H/7737?>o(2A_?{u'>7 `==Wpi}dϧ'v.Ⱦ2Y^<ӇXyy~~{'6~u+h ë >q^!eV w2{*wξ ?pf/+po?>+a%,-G!xs{ UziN:Lȉj?bFbFZ`X!C_5 lfUHv#H{ y*ϊa-Xc \|(:mJ[}pwwK\ӻ^7#`@jE f{&0HaOeR^b:"8r G#Rτ%P>-Z[XhWCC VAGL[X _DGY36ؘs`AX@z?6e_4B+LI=88hY X"=G1"978H3X˄ ۦ { nfh !l8t~C)yyޞoՙoo-Hu,k-Te5ʈfFK\{Hpehu?" GDÆGZK'h?D⡕B>,,7ug'H= `ı} /Q@60,lk1'!l"F?M!H \2nha?h"?͈+#Ă'?[BX?Z'$V} e@)ii@:TZVJ@, \͌o'zM[{@D}3<bhT``4Ӥ(IENDB` cREVGeneralscriptChecksum`}^.e revUniqueID 1109927011060 bookmarks handlerList mouseDown tempScript prevHandler mouseDownscriptSelection char 71 to 70script

on mouseDown

revGoUrl "http://www.sosmartsoftware.com"

end mouseDown