/[Search-Estraier]/trunk/Estraier.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/Estraier.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 45 by dpavlin, Fri Jan 6 01:36:09 2006 UTC revision 47 by dpavlin, Fri Jan 6 01:51:28 2006 UTC
# Line 818  Return true on success or false on failt Line 818  Return true on success or false on failt
818  sub put_doc {  sub put_doc {
819          my $self = shift;          my $self = shift;
820          my $doc = shift || return;          my $doc = shift || return;
821          return unless ($self->{url});          return unless ($self->{url} && $doc->isa('Search::Estraier::Document'));
822          $self->shuttle_url( $self->{url} . '/put_doc',          $self->shuttle_url( $self->{url} . '/put_doc',
823                  'text/x-estraier-draft',                  'text/x-estraier-draft',
824                  $doc->dump_draft,                  $doc->dump_draft,
# Line 885  Return true on success or false on failt Line 885  Return true on success or false on failt
885  sub edit_doc {  sub edit_doc {
886          my $self = shift;          my $self = shift;
887          my $doc = shift || return;          my $doc = shift || return;
888          return unless ($self->{url});          return unless ($self->{url} && $doc->isa('Search::Estraier::Document'));
889          $self->shuttle_url( $self->{url} . '/edit_doc',          $self->shuttle_url( $self->{url} . '/edit_doc',
890                  'text/x-estraier-draft',                  'text/x-estraier-draft',
891                  $doc->dump_draft,                  $doc->dump_draft,
Legend:
Removed from v.45  
changed lines
  Added in v.47
  ViewVC Help
Powered by ViewVC 1.1.26