From: Chip Salzenberg <chip@perl.com>
Date: Wed, 23 Apr 1997 18:29:12 +0000 (+1200)
Subject: Fix typo in NeXT dynaloader
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=894759269bb26e96d2633c2c986cb78b06a5f0ca;p=p5sagit%2Fp5-mst-13.2.git

Fix typo in NeXT dynaloader
---

diff --git a/ext/DynaLoader/dl_next.xs b/ext/DynaLoader/dl_next.xs
index 952c022..92d14bc 100644
--- a/ext/DynaLoader/dl_next.xs
+++ b/ext/DynaLoader/dl_next.xs
@@ -208,7 +208,7 @@ char *symbol;
     NXStream	*nxerr = OpenError();
     unsigned long	symref = 0;
 
-    if (!rld_lookup(nxerr, form("_%s", symbuf), &symref))
+    if (!rld_lookup(nxerr, form("_%s", symbol), &symref))
 	TransferError(nxerr);
     CloseError(nxerr);
     return (void*) symref;