David A. Christensen > Tk-MARC > Tk::MARC::Field

Download:
Tk-MARC-1.5.tar.gz

Dependencies

Annotate this POD

View/Report Bugs
Module Version: 0.11   Source  

NAME ^

Tk::MARC::Field - megawidget for editing MARC::Field objects.

SYNOPSIS ^

 use Tk;
 use Tk::MARC::Field;
 use MARC::Field

 my $mw = MainWindow->new;
 my $field = MARC::Field->new('245','','',
                              'a' => 'The Case for Mars: ',
                              'b' => 'The plan to settle the red
 planet, and why we must.'
                             );
 $mw->MARC_Field(-field => $field
                )->pack(-anchor => 'w');

 MainLoop;

DESCRIPTION ^

This is a megawidget that allows editing of a MARC::Field object. The widget itself does not change the MARC::Field - that is up to the widget's parent.

The widget allows you to indicate your desire to delete/undelete the field by clicking a button (which will change the color of the tag).

It allows you to add new subfields by selecting from a list (you can indicate your desire to delete a subfield by clicking a button)... and it knows what subfields are valid for this field (by using MARC::Descriptions).

You will likely never use a Tk::MARC::Field directly - it is simply a component of Tk::MARC::Editor.

AUTHOR ^

David Christensen, <DChristensenSPAMLESS@westman.wave.ca>

COPYRIGHT AND LICENSE ^

Copyright 2004 by David Christensen

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

syntax highlighting: