# HG changeset patch
# User i7tiol
# Date 1328690545 0
# Node ID ea5be5f3aa7c571ee8cfec5306aeb64966b0388d
# Parent  3794264508e68bbdf7553cfbd2fd8d247c744a55
Apply bugfix sent by Daniel Seither <post@tiwoc.de>.

diff -r 3794264508e6 -r ea5be5f3aa7c main/optim/inst/linprog.m
--- a/main/optim/inst/linprog.m	Mon Feb 06 21:00:30 2012 +0000
+++ b/main/optim/inst/linprog.m	Wed Feb 08 08:42:25 2012 +0000
@@ -93,7 +93,7 @@
 
     ## Sanitize lb
     if (isempty (lb))
-      LB = - Inf (nr_f, 1);
+      lb = - Inf (nr_f, 1);
     endif
     if (size (lb) != [nr_f 1])
       error ("size (lb) != [(rows (f)) 1]");
@@ -101,7 +101,7 @@
 
     ## Sanitize ub
     if (isempty (ub))
-      UB = Inf (nr_f, 1);
+      ub = Inf (nr_f, 1);
     endif
     if (size (ub) != [nr_f 1])
       error ("size (ub) != [(rows (f)) 1]");