11 |
|
# new(URLcache) : A new SimpleURLDoc object |
12 |
|
# addbasetags(parse) : Add Base Tags to the given parse |
13 |
|
# urlget(urlstring[,location]) : get the given url. Returns (url, filename) |
14 |
+ |
# expandurl(urlstring) : return a URLclass object of the given url expanded |
15 |
+ |
# according to the base settings |
16 |
|
# cache([cache]) : get/set the current URL cache |
17 |
|
|
18 |
|
package ActiveDoc::SimpleURLDoc; |
47 |
|
return $self->{cache}; |
48 |
|
} |
49 |
|
|
50 |
+ |
sub expandurl { |
51 |
+ |
my $self=shift; |
52 |
+ |
my $urlstring=shift; |
53 |
+ |
|
54 |
+ |
return $self->{urlhandler}->expandurl($urlstring); |
55 |
+ |
} |
56 |
+ |
|
57 |
|
sub urlget { |
58 |
|
my $self=shift; |
59 |
|
my $urlstring=shift; |