ViewVC Help

View File | Revision Log | Show Annotations | Root Listing

root/cvsroot/COMP/SCRAM/src/ActiveDoc/SimpleXMLURLDoc.pm

Comparing COMP/SCRAM/src/ActiveDoc/SimpleXMLURLDoc.pm (file contents):
Revision 1.4 by sashby, Thu Jan 19 17:26:29 2006 UTC vs.
Revision 1.6 by sashby, Mon Feb 13 17:29:25 2006 UTC

#	Line 80 | Line 80 | sub cache
80		$self->{cache}=shift;
81		$self->urlhandler_(URL::URLhandler->new($self->{cache}));
82		}
83	<
83	>
84		return $self->{cache};
85		}
86
87		sub expandurl
88		{
89		my $self=shift;
90	<	my $urlstring=shift;
90	>	my $urlstring=shift;
91		return $self->urlhandler_()->expandurl($urlstring);
92		}
93
#	Line 95 | Line 95 | sub urldownload
95		{
96		my $self=shift;
97		my $urlstring=shift;
98	–
98		my ($fullurl,$filename)=$self->urlhandler_()->download($urlstring, @_);
99
100		if ( ( ! defined $filename ) || ( $filename eq "" ) )
#	Line 110 | Line 109 | sub urlget
109		{
110		my $self=shift;
111		my $urlstring=shift;
113	–
112		my ($fullurl,$filename)=$self->urlhandler_()->get($urlstring, @_);
113
114		if ( ( ! defined $filename ) || ( $filename eq "" ) )
#	Line 128 | Line 126 | sub urlhandler_()
126		: $self->{urlhandler};
127		}
128
129	+	sub parseerror()
130	+	{
131	+	my $self=shift;
132	+	my ($string)=@_;
133	+	die "Error in download: ",$string,"\n";
134	+	}
135	+
136		1;
137
138		=back

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines