From: Peter Palfrader <peter@palfrader.org>
Date: Tue, 15 Jul 2008 13:58:09 +0000 (+0200)
Subject: Fix purposes_uplist to use passed argument instead of global variable
X-Git-Tag: release-0.3.33~65
X-Git-Url: https://git.adam-barratt.org.uk/?p=mirror%2Fuserdir-ldap-cgi.git;a=commitdiff_plain;h=0703b543dee932b71a73e7c4b1b1922a6f4247b4

Fix purposes_uplist to use passed argument instead of global variable
---

diff --git a/machines.cgi b/machines.cgi
index 4cfe3a8..bf0c058 100755
--- a/machines.cgi
+++ b/machines.cgi
@@ -98,7 +98,7 @@ sub purposes_uplist($) {
 		$out = "<ul>".
 			join("", map { 
 				"<li>".wiki_link($_)."</li>\n";
-			  } sort {my $A=$a; my $B=$b; $A =~ s/[\[\]]//g; $B =~ s/[\[\]]//g; $A cmp $B} @{$data->{purpose}}
+			  } sort {my $A=$a; my $B=$b; $A =~ s/[\[\]]//g; $B =~ s/[\[\]]//g; $A cmp $B} @{$purposes}
 			).
 			"</ul>";
 	}