lib/Frey/OpenSearch.pm

package Frey::OpenSearch;
use Moose;

extends 'Frey';
with 'Frey::Web', 'Frey::File';

use MIME::Base64;

sub grep_as_markup {
        my $self = shift;

        warn "# url ", $self->dump( $self->request_url );

        my $url = qq|http://localhost:3000/Frey::Shell::Grep/as_markup|; # FIXME don't hard-code URL
        my $icon = encode_base64( $self->read_file( 'static/icons/Frey/Shell/Grep.png' ) );

        $self->content_type( 'text/xml' );

        qq|
        <OpenSearchDescription xmlns="http://a9.com/-/spec/opensearch/1.1/"
                        xmlns:moz="http://www.mozilla.org/2006/browser/search/">
                <ShortName>Frey::Shell::Grep</ShortName>
                <Description>Find something with grep</Description>
                <InputEncoding>UTF-8</InputEncoding>
                <Image height="16" width="16">data:image/png;base64,$icon</Image>
                <SearchForm>$url</SearchForm>
                <Url type="text/html" 
                        method="get"
                        template="$url">
                        <Param name="pattern" value="{searchTerms}"/>
                </Url>
<!--
                <Url type="application/x-suggestions+json" template="suggestionURL"/>
                <moz:SearchForm>$url</moz:SearchForm>
-->
        </OpenSearchDescription>
        |;
}

=head1 SEE ALSO

L<http://developer.mozilla.org/en/docs/Creating_OpenSearch_plugins_for_Firefox>

=cut

__PACKAGE__->meta->make_immutable;
no Moose;

1;
1	package Frey::OpenSearch;
2	use Moose;
3
4	extends 'Frey';
5	with 'Frey::Web', 'Frey::File';
6
7	use MIME::Base64;
8
9	sub grep_as_markup {
10	my $self = shift;
11
12	warn "# url ", $self->dump( $self->request_url );
13
14	my $url = qq\|http://localhost:3000/Frey::Shell::Grep/as_markup\|; # FIXME don't hard-code URL
15	my $icon = encode_base64( $self->read_file( 'static/icons/Frey/Shell/Grep.png' ) );
16
17	$self->content_type( 'text/xml' );
18
19	qq\|
20	<OpenSearchDescription xmlns="http://a9.com/-/spec/opensearch/1.1/"
21	xmlns:moz="http://www.mozilla.org/2006/browser/search/">
22	<ShortName>Frey::Shell::Grep</ShortName>
23	<Description>Find something with grep</Description>
24	<InputEncoding>UTF-8</InputEncoding>
25	<Image height="16" width="16">data:image/png;base64,$icon</Image>
26	<SearchForm>$url</SearchForm>
27	<Url type="text/html"
28	method="get"
29	template="$url">
30	<Param name="pattern" value="{searchTerms}"/>
31	</Url>
32	<!--
33	<Url type="application/x-suggestions+json" template="suggestionURL"/>
34	<moz:SearchForm>$url</moz:SearchForm>
35	-->
36	</OpenSearchDescription>
37	\|;
38	}
39
40	=head1 SEE ALSO
41
42	L<http://developer.mozilla.org/en/docs/Creating_OpenSearch_plugins_for_Firefox>
43
44	=cut
45
46	__PACKAGE__->meta->make_immutable;
47	no Moose;
48
49	1;