Parent Directory | Revision Log | Patch
revision 1.19 by wakaba, Sun Jul 25 06:54:28 2004 UTC | revision 1.20 by wakaba, Tue Sep 21 03:18:21 2004 UTC | |
---|---|---|
# | Line 119 sub literal_or_code ($$) { | Line 119 sub literal_or_code ($$) { |
119 | } | } |
120 | sub expanded_uri ($$$) { | sub expanded_uri ($$$) { |
121 | my ($Info, $prefix, $lname) = @_; | my ($Info, $prefix, $lname) = @_; |
122 | warn "$0: $prefix: Namespace prefix not declared"; | warn "$0: $prefix: Namespace prefix not declared" |
123 | unless $Info->{Namespace}->{$prefix}; | |
124 | $Info->{Namespace}->{$prefix} . $lname; | $Info->{Namespace}->{$prefix} . $lname; |
125 | } | } |
126 |
|
admin@suikawiki.org | ViewVC Help |
Powered by ViewVC 1.1.24 |