code formatting

attached is a small package of loose methods that adds formatting to the
method card
of the classBrowserShell. It requires RBParser.pac as a prerequisite.

you must manually add a 'format' item to the context menu of
SmalltalkWorkspace.DefaultView. i'm sure there is a way to export/import
just the view, but i don't know what it is right now.

the format compiles the method source, but does not save it. if the compile
is successful, the source is formatted by RBParser and put into the pane
still unsaved.
























begin 666 codeFormatting.pac
M?"!P86-K86=E('P-"G!A8VMA9V4@.CT@4&%C:V%G92!N86UE.B G8V]D949O
M<FUA='1I;F<G+@T*<&%C:V%G92!P87A697)S:6]N.B P.PT*"6)A<VEC0V]M
M;65N=#H@)R<N#0H-"G!A8VMA9V4@8F%S:6-086-K86=E5F5R<VEO;CH@)R<N
M#0H-"B)!9&0@=&AE('!A8VMA9V4@<V-R:7!T<R(-"@T*(D%D9"!T:&4@8VQA
M<W,@;F%M97,L(&QO;W-E(&UE=&AO9"!N86UE<RP@9VQO8F%L(&YA;65S+"!R
M97-O=7)C92!N86UE<R(-"G!A8VMA9V4@8VQA<W-.86UE<PT*"7EO=7)S96QF
M+@T*#0IP86-K86=E(&UE=&AO9$YA;65S#0H)861D.B C0VQA<W-"<F]W<V5R
M4VAE;&P@+3X@(V9O<FUA=#L-"@EA9&0Z("-#;&%S<T)R;W=S97)3:&5L;" M
M/B C9F]R;6%T365T:&]D.PT*"6%D9#H@(T-L87-S1&5S8W)I<'1I;VX@+3X@
M(V-O;7!I;&5.;T%D9#IC871E9V]R:65S.CL-"@EA9&0Z("--971H;V1"<F]W
M<V5R("T^("-F;W)M871-971H;V1);D-L87-S.F-A=&5G;W)I97,Z.PT*"7EO
M=7)S96QF+@T*#0IP86-K86=E(&=L;V)A;$YA;65S#0H)>6]U<G-E;&8N#0H-
M"G!A8VMA9V4@<F5S;W5R8V5.86UE<PT*"7EO=7)S96QF+@T*#0HB0FEN87)Y
M($=L;V)A;"!.86UE<R(-"G!A8VMA9V4@8FEN87)Y1VQO8F%L3F%M97,Z("A3
M970@;F5W#0H)>6]U<G-E;&8I+@T*(E)E<V]U<F-E($YA;65S(@T*<&%C:V%G
M92!A;&Q297-O=7)C94YA;65S.B H4V5T(&YE=PT*"7EO=7)S96QF*2X-"@T*
M(D%D9"!T:&4@<')E<F5Q=6ES:71E(&YA;65S(@T*<&%C:V%G92!S9710<F5R
M97%U:7-I=&5S.B H261E;G1I='E3970@;F5W#0H)861D.B G1&5V96QO<&UE
M;G0@4WES=&5M)SL-"@EA9&0Z("=$;VQP:&EN)SL-"@EA9&0Z("=20E!A<G-E
M<B<[#0H)>6]U<G-E;&8I+@T*#0IP86-K86=E(0T*#0HB0VQA<W,@1&5F:6YI
M=&EO;G,B(0T*#0HB3&]O<V4@365T:&]D<R(A#0H-"B%#;&%S<T)R;W=S97)3
M:&5L;"!M971H;V1S1F]R(0T*#0IF;W)M870-"@DB5&AE('5S97(@:&%S('-E
M;&5C=&5D('1H92 C9F]R;6%T+B(-"@DB<F)&;W)M870B#0H-"@E\(&-A<F16
M:65W('-O=7)C959I97<@9&5F:6YI=&EO;E9I97<@8V]M;65N=%9I97<@? T*
M"6-A<F16:65W(#H]('9I97<@=FEE=TYA;65D.B G8V%R9',G+@T*"7-O=7)C
M959I97<@.CT@=FEE=R!V:65W3F%M960Z("=S;W5R8V4G+@T*"61E9FEN:71I
M;VY6:65W(#H]('9I97<@=FEE=TYA;65D.B G9&5F:6YI=&EO;B<N#0H)8V]M
M;65N=%9I97<@.CT@=FEE=R!V:65W3F%M960Z("=C;VUM96YT)RX-"@EC87)D
M5FEE=R!C=7)R96YT0V%R9#T]<V]U<F-E5FEE=R!I9E1R=64Z(%L-"@D)7G-E
M;&8@9F]R;6%T365T:&]D(%TN#0HB#0H)8V%R9%9I97<@8W5R<F5N=$-A<F0]
M/61E9FEN:71I;VY6:65W(&EF5')U93H@6PT*"0E><V5L9B!S879E1&5F:6YI
M=&EO;B!=+@T*"6-A<F16:65W(&-U<G)E;G1#87)D/3UC;VUM96YT5FEE=R!I
M9E1R=64Z(%L-"@D)7G-E;&8@<V%V94-O;6UE;G0@72XB(0T*#0IF;W)M871-
M971H;V0-"@DB4')I=F%T92 M($9O<FUA="!T:&4@=&5X="!O9B!T:&4@;65T
M:&]D('-O=7)C92X-"@ER8D9O<FUA="(-"@T*"7P@8V%T96=O<FEE<R!M971H
M;V0@? T*"6UE=&AO9" Z/2!S96QF(&UE=&AO9"X-"@EC871E9V]R:65S(#H]
M(&UE=&AO9"!I<TYI;" -"@D):694<G5E.B!;('P@8V%T('P@#0H)"0EC870@
M.CT@<V5L9B!C871E9V]R>2X-"@D)"2AC870@;F]T3FEL(&%N9#H@6V-A="!A
M8V-E<'1S061D:71I;VYS72D-"@D)"0EI9E1R=64Z(%M!<G)A>2!W:71H.B!C
M871=#0H)"0D):69&86QS93H@6W-E;&8@;6]D96P@9&5F875L=$UE=&AO9$-A
M=&5G;W)I97-=72 -"@D):69&86QS93H@6VUE=&AO9"!C871E9V]R:65S72X-
M"@D@;65T:&]D0G)O=W-E<E!R97-E;G1E<B!F;W)M871-971H;V1);D-L87-S
M.B!S96QF(&%C='5A;$-L87-S(&-A=&5G;W)I97,Z(&-A=&5G;W)I97,N#0H)
M(2 A#0HA0VQA<W-"<F]W<V5R4VAE;&P@8V%T96=O<FEE<T9O<CH@(V9O<FUA
M="%O<&5R871I;VYS(7!R:79A=&4A("$-"B%#;&%S<T)R;W=S97)3:&5L;"!C
M871E9V]R:65S1F]R.B C9F]R;6%T365T:&]D(6]P97)A=&EO;G,A<')I=F%T
M92$@(0T*#0HA0VQA<W-$97-C<FEP=&EO;B!M971H;V1S1F]R(0T*#0IC;VUP
M:6QE3F]!9&0Z(&-O9&4@8V%T96=O<FEE<SH@8V%T96=O<FEE<R -"@DB0V]M
M<&EL92!T:&4@87)G=6UE;G0L(&-O9&4L(&%S('-O=7)C92!C;V1E(&EN('1H
M92!C;VYT97AT(&]F('1H92!R96-E:79E<@T*"6%N9"!$3R!.3U0@861D('1H
M92!R97-U;'1I;F<@;65T:&]D('1O('1H92!R96-E:79E<B=S(&UE=&AO9"!D
M:6-T:6]N87)Y+"!I;B!T:&4@#0H)8V%T96=O<FEE<R!I;B!T:&4@/&-O;&QE
M8W1I;VX^(&]F(#Q-971H;V1#871E9V]R>3YS+"!C871E9V]R:65S+@T*"4EF
M('1H92!C;VQL96-T:6]N(&]F(&-A=&5G;W)I97,@9&]E<R!N;W0@:6YC;'5D
M92!A('!R:79A8WD@8V%T96=O<GDL('1H96X@=&AE#0H)<W5G9V5S=&EO;B!M
M861E(&)Y('1H92!D969A=6QT($UE=&AO9$-A=&5G;W)I>F%T:6]N4&]L:6-Y
M(&ES(&-H;W-E;BX-"@E4:&4@87)G=6UE;G0L(&-O9&4L(&ES(&5I=&AE<B!A
M(#QR96%A9&%B;&53=')I;F<^(&]R(&%N(&]B:F5C="!T:&%T(&-O;G9E<G1S
M( T*"71O(&$@/')E861A8FQE4W1R:6YG/B!W:&5N('-E;G0@(V%S4W1R:6YG
M+"!O<B!I="!I<R!A(#QG971T86)L95-T<F5A;3X@#0H)86-C97-S:6YG(&%N
M(&]B:F5C="!T:&%T(&ES(&$@/')E861A8FQE4W1R:6YG/BP@;W(@8V]N=F5R
M=',@=&\@82 \<F5A9&%B;&53=')I;F<^+B -"@E)9B!A(&-O;7!I;&4@97)R
M;W(@;V-C=7)S('1H96X@82!#;VUP:6QE<DYO=&EF:6-A=&EO;B!I<R!S:6=N
M86QL960N( T*"4%N<W=E<G,@=&AE(&YE=R!M971H;V0@;W(@;FEL+B(-"@T*
M"2)R8D9O<FUA="(-"@T*"7P@;65T:&]D('P-"@EM971H;V0@.CT@<V5L9B!B
M87-I8T-O;7!I;&4Z(&-O9&4N#0H);65T:&]D(&YO=$YI;" -"@D):694<G5E
M.B -"@D)"5M\(&%L;$-A=',@? T*"0D)86QL0V%T<R Z/2!C871E9V]R:65S
M+@T*"0D)*&%L;$-A=',@86YY4V%T:7-F>3H@6SIC('P@8R!I<U!R:79A8WE=
M*2 -"@D)"0EI9D9A;'-E.B -"@D)"0D)6R).;R!M971H;V0@<')I=F%C>2!W
M87,@<W!E8VEF:65D+"!S;R!L;V]K(&9O<B!T:&4@8V]N=F5N=&EO;F%L('-I
M9VYA='5R92XN+B(-"@T*"0D)"0E\('!O;&EC>2!\#0H)"0D)"6%L;$-A=',@
M.CT@3W)D97)E9$-O;&QE8W1I;VX@=VET:$%L;#H@8V%T96=O<FEE<RX-"@D)
M"0D)<&]L:6-Y(#H](%-M86QL=&%L:R!A=#H@(TUE=&AO9$-A=&5G;W)I>F%T
M:6]N4&]L:6-Y(&EF06)S96YT.B!;72X-"@D)"0D)<&]L:6-Y(&YO=$YI;" -
M"@D)"0D)"6EF5')U93H@6V%L;$-A=',@861D3&%S=#H@*'!O;&EC>2!D969A
M=6QT('-U9V=E<W1E9%!R:79A8WE&;W(Z(&UE=&AO9"E=72X-"@D)"6UE=&AO
M9 T*"0D)"6-A=&5G;W)I97,Z(&%L;$-A=',[#0H)"0D)<W1O<F5#871E9V]R
M:65S72X-"@E>;65T:&]D(2 A#0HA0VQA<W-$97-C<FEP=&EO;B!C871E9V]R
M:65S1F]R.B C8V]M<&EL94YO061D.F-A=&5G;W)I97,Z(6-O;7!I;&EN9R%P
M=6)L:6,A("$-"@T*(4UE=&AO9$)R;W=S97(@;65T:&]D<T9O<B$-"@T*9F]R
M;6%T365T:&]D26Y#;&%S<SH@8VQA<W,@8V%T96=O<FEE<SH@8V%T96=O<FEE
M<R -"@DB4')I=F%T92 M(&9O<FUA="!T:&4@8W5R<F5N="!M971H;V0@<V]U
M<F-E(&EN('1H92 \0VQA<W-$97-C<FEP=&EO;CXL(&-L87-S+ T*"6%N9" \
M0V]L;&5C=&EO;CX@;V8@/$UE=&AO9$-A=&5G;W)Y/BP@8V%T96=O<FEE<RX@
M(@T*#0H)(G)B1F]R;6%T(@T*#0H)?"!O<FEG:6YA;%-E;&5C=&EO;B!N97=-
M971H;V0@<V]U<F-E(&)B8B!M;V1I9FEE9"!P87)S951R964@? T*"6]R:6=I
M;F%L4V5L96-T:6]N(#H]('-O=7)C95!R97-E;G1E<B!V:65W('-E;&5C=&EO
M;E)A;F=E+@T*"6UO9&EF:65D(#H]('-O=7)C95!R97-E;G1E<B!I<TUO9&EF
M:65D+@T*"7-O=7)C95!R97-E;G1E<@T*"0EC;&5A<D5R<F]R<SL-"@D):7--
M;V1I9FEE9#H@9F%L<V4N#0H)<V]U<F-E(#H]('-E;&8@<V]U<F-E+@T*"5MN
M97=-971H;V0@.CT@8VQA<W,@8V]M<&EL94YO061D.B!S;W5R8V4@8V%T96=O
M<FEE<SH@8V%T96=O<FEE<UT@#0H)"6]N.B!#;VUP:6QE<DYO=&EF:6-A=&EO
M;@T*"0ED;SH@#0H)"0E;.F-N('P@#0H)"0ES;W5R8V50<F5S96YT97(@8V]M
M<&EL97).;W1I9FEC871I;VXZ(&-N('-O=7)C95)A;F=E.B H,2!T;SH@<V]U
M<F-E('-I>F4I72X-"@EN97=-971H;V0@:7-.:6P@#0H)"6EF5')U93H@#0H)
M"0E;(DEF('1H92!C;VUP:6QA=&EO;B!F86EL<R!W92!N965D(&$@=FES=6%L
M(&EN9&EC871I;VXL(&%N9"!W86YT('1O(')E<W1O<F4@=&AE(&UO9&EF:65D
M(&9L86<B#0H-"@D)"7-O=7)C95!R97-E;G1E<B -"@D)"0ET97AT.B H8VQA
M<W,@8V]M<&EL97)#;&%S<R!S>6YT87A#;VQO<D]F365T:&]D.B!S;W5R8V4@
M:6XZ(&-L87-S*2X-"@D)"7-O=7)C95!R97-E;G1E<B!I<TUO9&EF:65D.B!M
M;V1I9FEE9%T-"@D):69&86QS93H@#0H)"0E;<V]U<F-E4')E<V5N=&5R(&ES
M36]D:69I960Z('1R=64N#0H)"0EP87)S951R964@.CT@4D)087)S97(@<&%R
M<V5-971H;V0Z('-O=7)C92X-"@D)"7-O=7)C95!R97-E;G1E<B -"@D)"0ET
M97AT.B H8VQA<W,@8V]M<&EL97)#;&%S<R!S>6YT87A#;VQO<D]F365T:&]D
M.B!P87)S951R964@9F]R;6%T=&5D0V]D90T*"0D)"0D):6XZ(&-L87-S*5TN
M#0H)<V]U<F-E4')E<V5N=&5R('-H;W=%<G)O<G,N#0H)<V]U<F-E4')E<V5N
M=&5R('-E;&5C=&EO;E)A;F=E(&ES16UP='D@#0H)"6EF5')U93H@6W-O=7)C
M95!R97-E;G1E<B!V:65W('-E;&5C=&EO;E)A;F=E.B!O<FEG:6YA;%-E;&5C
M=&EO;ETN#0H)(W1O9&\)(E1A:V4@861V86YT86=E(&]F('1H92!N97<@8V]M
M<&EL97(@;F]T:69I8V%T:6]N<R!T;R!S:6UP;&EF>2!T:&ES( T*"0DH<&5R
M:&%P<R!M;W9E(&UO<F4@=&\@4VUA;&QT86QK5V]R:W-P86-E+"!L:6ME(&5X
M<')E<W-I;VX@8V]M<&EL871I;VXL#0H)"6%S(&UU8V@@;V8@=&AI<R!I<R!D
M=7!L:6-A=&5D(&EN('1H92!P86-K86=E(&)R;W=S97(@=&]O*2(A("$-"B%-
M971H;V1"<F]W<V5R(&-A=&5G;W)I97-&;W(Z("-F;W)M871-971H;V1);D-L
M87-S.F-A=&5G;W)I97,Z(6]P97)A=&EO;G,A<')I=F%T92$@(0T*#0HB16YD
M(&]F('!A8VMA9V4@9&5F:6YI=&EO;B(A#0H-"B -"B)":6YA<GD@1VQO8F%L
7<R(A#0H-"B)297-O=7)C97,B(0T*#0H`
`
end

In article <9d91m7$lhh$[hidden email]>, [hidden email] says...
Very nice!! Thank you! I had gotten to where I really liked having the
formatter in VW and sort of missed it in Dolphin. This works really
well. I just installed it and added the format option to the menu and it
works with no problem.

Thanks again,
Joey



-----= Posted via Newsfeeds.Com, Uncensored Usenet News =-----
http://www.newsfeeds.com - The #1 Newsgroup Service in the World!
-----==  Over 80,000 Newsgroups - 16 Different Servers! =-----