#include "gnomeprintperl.h"
SV *
newSVGnomePrintPaper (GnomePrintPaper * p)
{
HV * object;
if (! p)
return newSVsv (&PL_sv_undef);
object = newHV ();
hv_store (object, "name", 4, newSVpv ((char *) p->name, PL_na), 0);
hv_store (object, "width", 5, newSVnv (p->width), 0);
hv_store (object, "height", 6, newSVnv (p->height), 0);
hv_store (object, "version", 7, newSVuv (p->version), 0);
return sv_bless (newRV_noinc ((SV *) object),
gv_stashpv ("Gnome2::Print::Paper", 1));;
}
MODULE = Gnome2::Print::Paper PACKAGE = Gnome2::Print::Paper PREFIX = gnome_print_paper_
=for position DESCRIPTION
=head1 DESCRIPTION
C<GnomePrintPaper> is a boxed type representing a registered paper type.
In Perl, it is an hashref containing these keys:
=over
=item B<version>
Has to be 0 at moment.
=item B<name>
Name such as 'A4'.
=item B<width>
=item B<height>
Dimensional attributes.
=back
=cut
## GnomePrintPaper it's not a registered boxed type.
##const GnomePrintPaper *gnome_print_paper_get_default (void);
GnomePrintPaper *
gnome_print_paper_get_default (class)
CODE:
PERL_UNUSED_VAR (ax);
RETVAL = (GnomePrintPaper *) gnome_print_paper_get_default ();
OUTPUT:
RETVAL
##const GnomePrintPaper *gnome_print_paper_get_by_name (const guchar *name);
GnomePrintPaper *
gnome_print_paper_get_by_name (class, name)
const guchar * name
CODE:
PERL_UNUSED_VAR (ax);
RETVAL = (GnomePrintPaper *) gnome_print_paper_get_by_name (name);
OUTPUT:
RETVAL
##const GnomePrintPaper *gnome_print_paper_get_by_size (gdouble width, gdouble height);
GnomePrintPaper *
gnome_print_paper_get_by_size (class, width, height)
gdouble width
gdouble height
CODE:
PERL_UNUSED_VAR (ax);
RETVAL = (GnomePrintPaper *) gnome_print_paper_get_by_size (width, height);
OUTPUT:
RETVAL
##const GnomePrintPaper *gnome_print_paper_get_closest_by_size (gdouble width, gdouble height, gboolean mustfit);
GnomePrintPaper *
gnome_print_paper_get_closest_by_size (class, width, height, mustfit)
gdouble width
gdouble height
gboolean mustfit
CODE:
PERL_UNUSED_VAR (ax);
RETVAL = (GnomePrintPaper *) gnome_print_paper_get_closest_by_size (width, height, mustfit);
OUTPUT:
RETVAL
## gnome_print_paper_get_list returns a list of GnomePrintPaper.
##GList * gnome_print_paper_get_list (void);
=for apidoc
This method returns an array containing all the registered paper types.
=cut
void
gnome_print_paper_get_list (class)
PREINIT:
GList *l, *tmp;
PPCODE:
PERL_UNUSED_VAR (ax);
l = gnome_print_paper_get_list ();
for (tmp = l; tmp != NULL; tmp = g_list_next (tmp))
XPUSHs (sv_2mortal (newSVGnomePrintPaper (tmp->data)));
gnome_print_paper_free_list (l);
##void gnome_print_paper_free_list (GList *papers);