From 8254cbf193c939338449097a80163197fc755150 Mon Sep 17 00:00:00 2001
From: Nicholas Clark <nick@ccl4.org>
Date: Tue, 18 Jan 2011 11:10:41 +0000
Subject: [PATCH] Build perltoc.pod with pragmata sorted by name.

Previously they were actually sorted by full pathname, which isn't logical.
I presume that this is an artefact of all pragmata being in lib/ when
pod/buildtoc was originally written.
---
 pod/buildtoc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/pod/buildtoc b/pod/buildtoc
index 50fc892..aa80d15 100644
--- a/pod/buildtoc
+++ b/pod/buildtoc
@@ -351,7 +351,7 @@ EOPOD2B
 
 EOPOD2B
 
-  podset(sort values %Pragmata);
+  podset( @Pragmata{ sort keys %Pragmata } );
 
   ($_= <<"EOPOD2B") =~ s/^\t//gm && output($_);
 
-- 
2.7.4