From 670b614683cf9bbabf2f2f060e696cfee8b5b831 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 4 Sep 2008 07:24:39 +0000
Subject: simplify

---
 urpm/download.pm | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/urpm/download.pm b/urpm/download.pm
index 550fe2f7..9de5fc8a 100644
--- a/urpm/download.pm
+++ b/urpm/download.pm
@@ -931,10 +931,10 @@ sub _create_metalink_ {
     # Even if not required by metalink spec, this line is needed at top of
     # metalink file, otherwise aria2 won't be able to autodetect it..
     my @metalink = (
-      qq(<?xml version="1.0" encoding="utf-8"?>),
-      qq(<metalink version="3.0" generator="URPMI"),
-      qq(xmlns="http://www.metalinker.org/">),
-      qq(<files>),
+      '<?xml version="1.0" encoding="utf-8"?>',
+      '<metalink version="3.0" generator="URPMI"',
+      'xmlns="http://www.metalinker.org/">',
+      '<files>',
     );
 
     # only use the 8 best mirrors, then we let aria2 choose
@@ -948,13 +948,13 @@ sub _create_metalink_ {
 	} @mirrors;
 
 	push @metalink, 
-	  qq(\t<file name=") . basename($rel_file) . qq(">),
+	  qq(\t<file name=") . basename($rel_file) . '">',
 	  qq(\t\t<resources>),
 	  (map { "\t\t\t$_" } @lines),
 	  "\t\t</resources>",
 	  "\t</file>";
     }
-    push @metalink, "</files>", "</metalink>";
+    push @metalink, '</files>', '</metalink>';
     
     output_safe($metalinkfile, join('', map { "$_\n" } @metalink));
     $metalinkfile;
-- 
cgit v1.2.1