|
Last change
on this file since 17 was 4, checked in by sjboddie, 26 years ago |
|
Initial revision
|
-
Property svn:executable
set to
*
-
Property svn:keywords
set to
Author Date Id Revision
|
|
File size:
357 bytes
|
| Line | |
|---|
| 1 | # document processors are used by the document reader plugins
|
|---|
| 2 | # to do some processing on some documents
|
|---|
| 3 |
|
|---|
| 4 | package docproc;
|
|---|
| 5 |
|
|---|
| 6 | sub new {
|
|---|
| 7 | my ($class) = @_;
|
|---|
| 8 | my $self = {};
|
|---|
| 9 |
|
|---|
| 10 | return bless $self, $class;
|
|---|
| 11 | }
|
|---|
| 12 |
|
|---|
| 13 | sub process {
|
|---|
| 14 | my $self = shift (@_);
|
|---|
| 15 | my ($doc_obj) = @_;
|
|---|
| 16 |
|
|---|
| 17 | die "docproc::process function must be implemented in sub classes\n";
|
|---|
| 18 | }
|
|---|
| 19 |
|
|---|
| 20 | 1;
|
|---|
| 21 |
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.
