[Xen-changelog] [xen-unstable] docs: implement uniq instead of depending on List::MoreUtils

[Xen patchbot-unstable <patchbot@xxxxxxx>]

# HG changeset patch
# User Ian Campbell <ian.campbell@xxxxxxxxxx>
# Date 1322755551 0
# Node ID 7b180380681db3382f7c2f38e096bc551aa301d2
# Parent  b376adfe410a7b325b77fa0b985504dd418fe71b
docs: implement uniq instead of depending on List::MoreUtils

Signed-off-by: Ian Campbell <ian.campbell@xxxxxxxxxx>
Committed-by: Ian Jackson <ian.jackson@xxxxxxxxxxxxx>
---


diff -r b376adfe410a -r 7b180380681d docs/gen-html-index
--- a/docs/gen-html-index       Thu Dec 01 15:36:51 2011 +0000
+++ b/docs/gen-html-index       Thu Dec 01 16:05:51 2011 +0000
@@ -10,7 +10,6 @@
 use Getopt::Long;
 use IO::File;
 use File::Basename;
-use List::MoreUtils qw/ uniq /;
 
 Getopt::Long::Configure('bundling');
 
@@ -99,6 +98,12 @@
     }
 }
 
+sub uniq (@) {
+    my %h;
+    foreach (@_) { $h{$_} = 1; }
+    return keys %h;
+}
+    
 for (@docs) { s,^\Q$outdir\E/,, }
 
 @docs = grep { -e "$outdir/$_" && (make_linktext($_) ne "NO-INDEX") } @docs;

_______________________________________________
Xen-changelog mailing list
Xen-changelog@xxxxxxxxxxxxxxxxxxx
http://lists.xensource.com/xen-changelog