[mv] PATCH: Interchange UI/Primitive.pm

[Stefan Hornburg <racke@linuxia.de>]

******    message to minivend-users from Stefan Hornburg <racke@linuxia.de>     ******


If you select in the mv_metadata Text or Textarea, but neither width
nor height is specified, the resulting form element is a <SELECT>.
This seems wrong to me, which is cured by the following patch
(line numbers may differ, but you get the idea):

diff -u -c -r1.2 Primitive.pm
*** Primitive.pm	2000/08/02 07:52:51	1.2
--- Primitive.pm	2000/08/06 16:31:32
***************
*** 752,759 ****
  				$record->{type} =~ s/(left|right)[\s_]*\d*/$1 $record->{width}/;
  			}
  		}
  
! 		$opt = {
  			attribute	=> ($record->{'attribute'}	|| $column),
  			table		=> ($record->{'db'}			|| $meta_db),
  			column		=> ($record->{'field'}		|| 'options'),
--- 752,765 ----
  				$record->{type} =~ s/(left|right)[\s_]*\d*/$1 $record->{width}/;
  			}
  		}
+         elsif ($record->{type} =~ /textarea/) {
+ 			$record->{type} = 'textarea_2_60';
+         }
+         elsif ($record->{type} =~ /text/) {
+ 			$record->{type} = 'text_60';
+         }
  
!         $opt = {
  			attribute	=> ($record->{'attribute'}	|| $column),
  			table		=> ($record->{'db'}			|| $meta_db),
  			column		=> ($record->{'field'}		|| 'options'),


Ciao
        Racke

-- 
LinuXia Systems && Cobolt NetServices, eCommerce and more
Shop- und Datenbanklösungen mit MiniVend, Firewalls auf Debian-Basis
http://www.linuxia.de - http://www.cobolt.net
--> Coding from hell and back <--- 
-
To unsubscribe from the list, DO NOT REPLY to this message.  Instead, send
email with 'UNSUBSCRIBE minivend-users' in the body to Majordomo@minivend.com.
Archive of past messages: http://www.minivend.com/minivend/minivend-list