From 66917084e6cdee5882224dbcdb1bcee7942bc0e6 Mon Sep 17 00:00:00 2001
From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Thu, 12 Sep 2013 23:27:40 +0200
Subject: [PATCH] sort records by id

---
 crolist2marc.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/crolist2marc.pl b/crolist2marc.pl
index e74069c..b3670fb 100755
--- a/crolist2marc.pl
+++ b/crolist2marc.pl
@@ -97,7 +97,7 @@ csv_file( 'OBRTAG.csv', sub {
 });
 
 print STDERR "\n# getting all ids ";
-my @ids = keys %$data;
+my @ids = sort keys %$data;
 print STDERR scalar(@ids), " found\n";
 
 my $marc_file = 'liberated.marc';
-- 
2.20.1