From c08ab0152390f7259fd0ce89c8fa000b46f4767b Mon Sep 17 00:00:00 2001
From: toins <toins>
Date: Tue, 1 Aug 2006 08:50:11 +0000
Subject: [PATCH] Add a call to GetOrderNumber.

---
 catalogue/moredetail.pl | 4 +++-
 opac/opac-moredetail.pl | 5 ++++-
 2 files changed, 7 insertions(+), 2 deletions(-)

diff --git a/catalogue/moredetail.pl b/catalogue/moredetail.pl
index 78dcd56e3a..edd7c30772 100755
--- a/catalogue/moredetail.pl
+++ b/catalogue/moredetail.pl
@@ -71,7 +71,9 @@ my @results;
 my (@items)=itemissues($bi);
 my $count=@items;
 $data->{'count'}=$count;
-my ($order,$ordernum)=GetOrder($biblionumber,$bi);
+
+my $ordernum = GetOrderNumber($biblionumber,$bi);
+my $order = GetOrder($ordernum);
 
 my $env;
 $env->{itemcount}=1;
diff --git a/opac/opac-moredetail.pl b/opac/opac-moredetail.pl
index 357e1b6b96..6374277e11 100755
--- a/opac/opac-moredetail.pl
+++ b/opac/opac-moredetail.pl
@@ -38,7 +38,10 @@ my $bi=$input->param('bi');
 my $data=bibitemdata($bi);
 
 my (@items)=itemissues($bi);
-my ($order,$ordernum)=GetOrder($bib,$bi);
+
+my $ordernum = GetOrderNumber($bib,$bi);
+my $order = GetOrder($ordernum);
+
 #print @items;
 my $count=@items;
 
-- 
2.39.5