From c12e1b3758fdd545210d65d6058078d19fcda7cd Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Sat, 7 Mar 2009 04:16:29 +0000
Subject: [PATCH] Search form for StoryArchive view form.

---
 .../root_import_storymanager.wgpkg            | Bin 2168 -> 2253 bytes
 lib/WebGUI/Asset/Wobject/StoryArchive.pm      |  17 ++++++++++---
 lib/WebGUI/Help/Asset_StoryArchive.pm         |   4 +++
 lib/WebGUI/i18n/English/Asset_StoryArchive.pm |  24 ++++++++++++++++++
 4 files changed, 42 insertions(+), 3 deletions(-)

diff --git a/docs/upgrades/packages-7.7.0/root_import_storymanager.wgpkg b/docs/upgrades/packages-7.7.0/root_import_storymanager.wgpkg
index 9fabb76e4cc8d703e91b2f429fe21b4ca819c663..590d301b1e2052ba85015a1a7c6a855ae076d737 100644
GIT binary patch
literal 2253
zcmV;;2r~B{iwFP!00000|Lt0BPa`=J=JWoFR-`@cN;4##q!Yq$k-{(x?7<8pV42~#
zMNYR#44rnb?FPbW|NEA!U+i>V2)6|7?hy$(Y1>uhs&e@$m)F-;|Ebk#?Y6hJrk|}Q
zKHVlfo#Inlb6wYKHrjQs)>?C1w^nbiIWT1PpF}DmKs29+EV`M`FOgKp`OSKA@WIL9
zb3xZXQxi(<n*W}=el2<QtRe#SR%Z8E_OG`*uVnv5s{w8R+Fbo-RrX(Bz39)u;lJO(
zBCJTo1sTwav+4Z%KX33=EO<<XVpQt4*iH8gn2bX*K4B`v?iII!{dJo!C{Z-n9_ta6
zhG__iR3GkRE}*rC^r9pTi*c|5RZ1*Q`XQ4;8kn&Wy*p!3!0(V~%{0hy#AC^($??00
zic?sw`$1U{danf8qa-*XgXw`pN~*F!SNv}8YVi5yC)K+Tq-u*~aKZ<Mdm=(4E;v_J
zHqvveYAudOBmzwe(^EpzXA!_Ft(D&Kd(*_^9t#2*VT+|mCXWPHT#e&YE!M1WnPkA`
zJ@JS1gpDXqR65C4&FVD}Jc;*%4*^SC-MV2a)i|UlbOdHpG@I?wwu0Xn1&V(yiyn)H
zR4{ca!d<~fM?}ylC2aKxsPqMk72`OcX$!v}l4vl~Jy=9D@2i+dRKuv`S!(gYkK`vZ
zN|ka(`yWsDH#d9QYMYy9ynju7__E7Gt?a_PwDTSEfL$?gD{TU|-e}c3wT4Yv75;pz
zjp!Vft(a-_XGT*;Y#RphhQ*(_0tP<GXJ4@tGon#q*2^6FdJQD#k`)re+Pk&a06OL|
zdq^kVa6QAE$ph}+<XWApbewpn)9!S<cHNRqQ0-7W+R0a-R*t*T?6{WR!5xWzQ&`9_
zSC4y9d&6|6kuS!vI+{g^4D!{QP(R)|z6_P>g`zKp-ov+{weXlc9!p@1GqPr)msu~2
zhonyx7$OYQC}j1(x#pU(!xNKfa3cLVG3_x0#ke4fwS?v>))9WO)?X}Gq%^DJ<rX3!
zql%8mzkT=Ha|HYnjp_B4zIjd*02CMP{{Z`1rTxFzsJXBEf5}uU`T5lS|L?TNH@?K*
z)SmeD@_N*}ad$r@>dT?mGx6%NJwDy=^B`!(O>FB{09vrEmpAODp;pk>d)F3mBG>@`
zc~N1(mfo{3Z;5a);Oqz8i;Ba7xozF8D(PNC=`eQXNGf&cUk3{7Bp9*ibJX36yN0aK
zBPDn!VIaJ&B0F}aNd)ZH!QB{`-NKfLo7zQ1H$hJslc;D$P=wnbv>V#E;dZzB!l?pj
zJz_$%q@Q(|rgfZ*MnsG!sL7&#N@_ybOm1h$2E!2k6impT07|%5G-|?0n28#49$N!1
z_3!Rh$gG(ZWMLk<A=Ojbv8oAGfm!}KRUfERYid$Qr*WXsGqC?<KT=dg2qsAQg9b28
zlD57<wDaRT$7nKZ(O|Ial!lT4Pe)v$g?@aeEji74dkncRo#xyhXQSWqFeH7*5j4J;
z;NHifFuhrH3mbvAg*-(^v)lt93{o!oYo{&-IR6+0L=IujW#bwppbh6p@h>{Q<06pL
z^SjAfN?JvuXKk6qi8B=R3cTI0gy;YZ&T@oo1V}-;AS=3E<_4%7^aHc5m%-H9ECpK9
z8}me_p6=9!;zE3Ul3_K|9n-G)pnMi=ZfvwY&w{?VND+yle>u}k7T{)pT>(QRl)`dL
zvi|{5PqTgkq;~7|mSGQY4zfoSs+45pOg1<7P7V+9UuNV2G|uD>y&_4NC1hrdZ3g7I
zEKDyOV=hdWLw>g(?Q$_n6Aafd*P981SU=4y(1@mSDZG9jeQaE|+2PKvIDcEeis{+j
zS!)TrK8eOHk)Djk>l+(hXVQF-o-WSgR|lw9g3?w;G>swVzn4as#tY(q&ux~^|C)73
z30}|tR%iBt^8Yjb|Iknm=hqLz(Kr4n?2V7=Kc6)kUrhXa6#rA$zYuwtF{{M>aDo*E
zaM)GgM$I2%HsBCIbs-(lD6kO86@>f~eX<3ZBx{6jMcSa7^<gL#dbCEV@IWYT`bct1
zw-cp!1em56>66H(VfNm@ca5s?coBe-A5tPVojzB?cN!)k`T_d+Gh+v^l7?l(+v&VX
zH(m``(;m~3DLpa0sR8Xge|Rnd@_eEUp6AJu_g|4XDac+{n6&qbM9ES4vcly3S0qju
z!OwS>yyuDpDY8JhtY*xJ6^VqAX<2Eo^B))FrJ_d>iLM|3>_QDDjbYV1L_#F9V)7Ez
zizPBGtDv>|Osn338mN5=R1_$5(&S*&H#2;JENd3qr({^3XP<%pH8QNS5uPc-s%l*t
z<1LkDjdwr9-ow}STYmEOy4_0#hoimb3#VC~&W4ryPZT}oluKXJtO98NNxzuPFR!=a
zoB9jpe~ostUatSV=6^5bFHg<?9=Xafw>*TWTzI_oEO$H>U*uSD1LV=14uKF6{*c{L
z6Qi>V3r=8szvJDI_SZeyKRVcXd+>Gp?x$bxOy31%o_X2f3zmN%kwWnFhYCOz5&J?=
zcWYR;(of9LAUo49?dnlpV*(K%kv!rOlUTTE)P?fa)Hyo|0z^Bf>3Ms(!Vv@xfus{I
zZP-w^ml{y#kEEzFW%JfqZh;>qWU2lz%Yw_VQ#@Sin`gbH*A@uH(|&BmN`fxyq-BJQ
z=$D-zzJGXQ_|Ta9Lw)(83!-8%41|NC(M1Fm|19A~A~?gGif+>%P3_#GhN~~TtN;X^
zS?ZiBTjW;KMT@?u=B%yy1&E{zS^81TYC?%wZuLIoNzk<x!t>y63pd(l<<r;9o`}k4
zUJPn<I!)I?ISY_ADh?w8`e){HX8Moa3z}d5z-Uw4_vv_6=CKfR&$wwcCDmW0xKXmh
zGePeubu0zGzxmPm$D{kVrw#G(;IkWdyup|DM8uzcCuvbBV{ZM!Uc~5KcwcR!v(d5K
b;1zto5I%Zk^QwWrvj%<#!4tXv05SjoI=5{D

literal 2168
zcmV-;2#5C{iwFP!00000|Lt1;bK*7@&(HlUJk0c_o!Jc-V+h$CGvr%IZ?l^nNVB__
zYev`t6pZCcauRaW|GiK07YP#*a*H$VHS8=7mh`^s>GS-&y;c6FR;#sI?$(yPHXG_{
zH{fdJpW2pf+it^we=uO#cCGGgS+J!1Ps{~kAeu)55>8k1i#cX|^{`Y9K1w-tePrsN
zX-G+J>u=ZIzUDOCsE9zlnfm=9|JR$YTkyZrblfcqtXcl2EdOtpFZw1p{P#Q9gcU9*
zLt|XAcCCN^=Z(4*F&bee2<GyxnkHxZghv6I4~PiV^om_k^W~VwFcR3`pUV{$M-K#u
zi=(@UG8pYDdSM&{`8wEvA|V#V!+`J!_VwBj-(HZ=r?-k|O%L#SNFz>`$<f;ovvb(4
zCw@^7d?y&{VdM|cczGe>9E)_(h~D-_<B!vyMfc9<qQ&CzfQ~iym<5VBqf}JMOzKvZ
zR-DgJ2$p1eCWoPq%!gajD&78p9wNL)d>@Bu#4se`XN(Fe=22o6L+cyD39vap-UJWG
z4AWR7N;Yf8tTCf;bmAZRBpJ2qnkg6a01xmC+$eCW?b*J7-zp2_UrmD^2`88lan6Ec
zMrUV;;V>a=%<(bz7>NX-N}pv9A52g<elR>ph|}n+=uA{oS;;lb;z1no4``Mc<pK|X
zIzQRn?Mkoh?q1O0HTK|-V;V?f=g}pD@09vvL?EoB3+%enthZ~9Nm}Ib+?P(YPK#bl
zE&2<=Ng%c~13o3u2P%MphcfLehGAwnjP-t5L0|5HScPN-MX>j7%srq2vrq05#U0z#
z%n5%_y=i9El}1;Jx7)3D+ilei*%+1qMZ?2v2TJ4EJB_w&*d4+VdDGlOnz?v7ids8*
zIu1QHkHpzSl+ZZatugkZ!~RtuL^ohVHgWI2OpJ|3cz@1;vC_!UL~gTg5KYh!3vfgb
zBw5Iqp>)kGWu_;>ljMYkD{|UX28z^%$oG<RSH6$bAIAQR7zu@B)n9KT0y3(|jQsm|
zzi%Sp7icW+x8%+yQ2<bU?EG&yt!Cl;Z#V#@UeEu6ugduO-1Gnc>5O+iMPEdZ{dRRd
z>rU<C53%@k>UMR$dg_c%4*V<$>U9gpx{-h$Io68@c0*Ik>C3Zg4_P4`fd9O#5Pwge
z*;hA+St{Y2_?^p&Mf{axoxLjRT!zUqGO{@4GWBl*g>B@|Ncb`A>_r_-)}x_dG~loh
zZdVmMGLj^Ga$~8}7?|C_k*E%}%ZeO=nLI*aKCD2II{si>(^dy=XK%=?Dv*{d7DS7O
z>4ark{dhJ*Y`#E^=kpU%3&N&yTN5&#1n^&gLZ$*r!d^Zo3CBSyYCvgZEWDDxJ9_~!
zG|9<=9&#YDQ!=qC2~~kvb~`a2m{VG6(MIQyFVQow|Meskn1u>Vpx_4yV5~S9eWTFM
zkMAsP$#g`5!H!i}ipDfqaiu);<2&ieW!C$1sD1G==ixkEeL#Z%4WUMm_-29oP%Q=Z
z9-^E32%;^Z2|9WxJOIKd%K3a5)cFGIA2T2E3FusOt~P@5;R-4Kh3B`F`FvTwX*yD{
zs&aZdmU<jn6NX0+?V2TI2iR~%Afzim3e*8vRoJCrpp2v9K=12yFtv0`j+W%Xyilnp
zC$*;dC_WyfSWQn?W!Gv@{t#?-c3Q4$Kwq^<6%teNWi2y#1UCch@`*x12`o1x`yUYX
zGV5nRYP()<YW4u<pn6n76^e|E$?k4%aQZ&`rB^<J#tA>fBNPW|L8jN3Zcseeh3Q3S
ztc2-&LT^vPW6EYpfnjUr@-TrE>m`+ia-tqw3$K3-e{!x`<n-{EeSKRWMfjq3(Od(s
zFQRcnq-Ue?`p%BqUUVOnr;pe1<pJt4Kw613lN_SI-6X>}FNptLyHR}p*Qmqu;#d4%
zqTe&pe`oxE<cRyP*Y}gz7y2RS&d=(<TsY1ro&TQ1{}|3Mg*^0{GO<5A!3unM*p=f(
z$zSDcz#)L@0zAf{Zy=Hpr2K(=vIUqV9fWCl*&v7I!%)oRYKc<eqM*2*!_f`ikA<Ki
zV48fThe8hr>3t2~C8}1B7Xc`F0Y+@s8d5QNCt;F8KR`dbrtAP#;-H9l+wC{W!7Bl4
zGGkdXAr+H{8qm(_hfN8P)e}YVyh@gAeo5jaAbVY5lG!DRlA-c-g~{fZBu){*uMU@N
zW=VqNRUlv2GI~WxBB{)@t~6@$w+r%8*(1+HBS-+p(1S^GST#$Lkjadkyhit8jY`XC
zXq8`S)!WbmHJ<|I4GLK_St{#m4PT(jdWh|FDlFGEpMn21Dy*UtHdJ9%r7gAd)+)2+
z$48NS|GD*+4nAMEy7BmQ)@!_QnbmIZ7`6XG(_=-u^tH^&aQ2_|sw=;&->UA^U$Fjj
zTqyPy-~WOBkNsNzy+q9Xo$J5(-Jv^0t<OC?JbQom_WkGm+n;~C)rtAZ`cHu-#JmZ)
z!FpMlCE&NWf1r?3;OUzhKn4->g`m#fq;8a-szQV6Ox`rRM;U*pBF`vS6)e1F)PdgC
z(nEIS`wHruClA|;?G4|z5LBG-#)gS=yNO3+@rd#kQ_579xav>!kY9FOk|+F^;jf23
ze1HE&*SI*M-bB6^(E&oLPX$Y%pK}>PGd`__6%oZhqaw%TM^gK0P*Z)=^gRL~Xg#Ft
zQb!>(pzJ3MSv6yAv=%@l*<+HIT&r9~*+ogqo`ZnKe#eN>%|K!U(v=U1;hd<|j8|Wj
zb#(I~^}5#a1wgTi%_YXqfW<qmf${$;eTRY{HiU|o%(xaV-p7GE{c_iDxN*PV99|ur
uziroy9KPyxp-r|Q+B<EdHhjg!FM(TLdAwTS)dJscfj<BdtH28YG5`RtE<rB<

diff --git a/lib/WebGUI/Asset/Wobject/StoryArchive.pm b/lib/WebGUI/Asset/Wobject/StoryArchive.pm
index f0c168e15..3d6bee608 100644
--- a/lib/WebGUI/Asset/Wobject/StoryArchive.pm
+++ b/lib/WebGUI/Asset/Wobject/StoryArchive.pm
@@ -266,15 +266,20 @@ sub view {
 
 #-------------------------------------------------------------------
 
-=head2 viewTemplateVars ( )
+=head2 viewTemplateVars ( $mode )
 
 Make template variables for the view template.
 
+=head3 $mode
+
+Whether to get assets in view mode, by time, or search mode, by keywords.
+
 =cut
 
 sub viewTemplateVariables {
-    my ($self)  = @_;
-    my $session = $self->session;    
+    my ($self)   = @_;
+    my $session  = $self->session;    
+    my $keywords = $session->form->get('keywords');
     ##Only return assetIds,  we'll build data for the things that are actually displayed.
     my $storySql = $self->getLineageSql(['descendants'],{
         excludeClasses => ['WebGUI::Asset::Wobject::Folder'],
@@ -315,6 +320,12 @@ sub viewTemplateVariables {
         startAsset  => $self,
         displayFunc => 'search',
     });
+    my $i18n = WebGUI::International->new($session, 'Asset');
+    $var->{searchHeader} = WebGUI::Form::formHeader($session, { action => $self->getUrl })
+                         . WebGUI::Form::hidden($session, { func   => 'view' });
+    $var->{searchFooter} = WebGUI::Form::formFooter($session);
+    $var->{searchButton} = WebGUI::Form::submit($session, { name => 'search',   value => $i18n->get('search')});
+    $var->{searchForm}   = WebGUI::Form::text($session,   { name => 'keywords', value => $keywords});
     return $var;
 }
 
diff --git a/lib/WebGUI/Help/Asset_StoryArchive.pm b/lib/WebGUI/Help/Asset_StoryArchive.pm
index 11f96069c..f33148e1a 100644
--- a/lib/WebGUI/Help/Asset_StoryArchive.pm
+++ b/lib/WebGUI/Help/Asset_StoryArchive.pm
@@ -34,6 +34,10 @@ our $HELP = {
                     },
                 ]
             },
+            {   'name' => 'searchHeader' },
+            {   'name' => 'searchForm'   },
+            {   'name' => 'searchButton' },
+            {   'name' => 'searchFooter' },
         ],
         related => []
     },
diff --git a/lib/WebGUI/i18n/English/Asset_StoryArchive.pm b/lib/WebGUI/i18n/English/Asset_StoryArchive.pm
index 88959c04d..c90989f44 100644
--- a/lib/WebGUI/i18n/English/Asset_StoryArchive.pm
+++ b/lib/WebGUI/i18n/English/Asset_StoryArchive.pm
@@ -171,6 +171,30 @@ our $I18N = {
         lastUpdated => 0,
     },
 
+    'searchHeader' => {
+        message => q|HTML code for beginning the search form.|,
+        context => q|Template variable.|,
+        lastUpdated => 0,
+    },
+
+    'searchForm' => {
+        message => q|The text field where users can enter in keywords for the search.|,
+        context => q|label for the URL to add a story to the archive.|,
+        lastUpdated => 0,
+    },
+
+    'searchButton' => {
+        message => q|Button with internationalized label for submitting the search form.|,
+        context => q|Template variable.|,
+        lastUpdated => 0,
+    },
+
+    'searchFooter' => {
+        message => q|HTML code for ending the search form.|,
+        context => q|label for the URL to add a story to the archive.|,
+        lastUpdated => 0,
+    },
+
 };
 
 1;