[css-cvs] CVS: CSS-SAC/lib/CSS/SAC TestWriter.pm,1.3,1.4 Writer.pm,1.4,1.5

[Bj?rn H?h. <hoe...@us...>]

Update of /cvsroot/perl-css/CSS-SAC/lib/CSS/SAC
In directory usw-pr-cvs1:/tmp/cvs-serv8745/lib/CSS/SAC

Modified Files:
	TestWriter.pm Writer.pm 
Log Message:
finishing uri() to url() patches I've missed...

Index: TestWriter.pm
===================================================================
RCS file: /cvsroot/perl-css/CSS-SAC/lib/CSS/SAC/TestWriter.pm,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- TestWriter.pm	2001/08/17 18:00:01	1.3
+++ TestWriter.pm	2001/10/21 18:56:05	1.4
@@ -172,7 +172,7 @@
     my $uri = shift;
     my $media = shift;
 
-    $dh->[_out_]->($dh, "\n\@import uri($uri) " . join(', ', @$media) . ";\n");
+    $dh->[_out_]->($dh, "\n\@import url($uri) " . join(', ', @$media) . ";\n");
 }
 #---------------------------------------------------------------------#
 
@@ -190,7 +190,7 @@
         $dh->[_nsmap_]->{$uri} = $prefix;
     }
 
-    $dh->[_out_]->($dh, "\n\@namespace" . ((defined $prefix)?" $prefix ":' ') . "uri($uri);\n");
+    $dh->[_out_]->($dh, "\n\@namespace" . ((defined $prefix)?" $prefix ":' ') . "url($uri);\n");
 }
 #---------------------------------------------------------------------#
 

Index: Writer.pm
===================================================================
RCS file: /cvsroot/perl-css/CSS-SAC/lib/CSS/SAC/Writer.pm,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- Writer.pm	2001/08/17 19:56:03	1.4
+++ Writer.pm	2001/10/21 18:56:05	1.5
@@ -212,7 +212,7 @@
     my $uri = shift;
     my $media = shift;
 
-    $dh->[_out_]->($dh, "\n\@import uri($uri) " . join(', ', @$media) . ";\n");
+    $dh->[_out_]->($dh, "\n\@import url($uri) " . join(', ', @$media) . ";\n");
 }
 #---------------------------------------------------------------------#
 
@@ -230,7 +230,7 @@
         $dh->[_nsmap_]->{$uri} = $prefix;
     }
 
-    $dh->[_out_]->($dh, "\n\@namespace" . ((defined $prefix)?" $prefix ":' ') . "uri($uri);\n");
+    $dh->[_out_]->($dh, "\n\@namespace" . ((defined $prefix)?" $prefix ":' ') . "url($uri);\n");
 }
 #---------------------------------------------------------------------#