summaryrefslogtreecommitdiff
path: root/databases/p5-Class-DBI/files/5.005-lib::Class::DBI.pm
blob: 130b4d488e5bf3a1d8784b53b4667d288b7afe8d (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
--- lib/Class/DBI.pm~	Tue Mar 16 17:01:40 2004
+++ lib/Class/DBI.pm	Tue Mar 16 17:02:02 2004
@@ -153,7 +153,7 @@
 		my ($class, $alias) = split /=/, shift, 2;
 		my $table = $class ? $class->table : $self->table;
 		$cmap{ $alias || $table } = $class || ref $self || $self;
-		($alias ||= "") &&= " AS $alias";
+		if ($alias ||= "") { $alias = " AS $alias" };
 		return $table . $alias;
 	};