From: Matthias Braun <matze@braunis.de>
Date: Wed, 19 Oct 2011 19:36:44 +0000 (+0200)
Subject: fix perl warning
X-Git-Url: http://nsz.repo.hu/git/?a=commitdiff_plain;h=25abc6c935291ab5a0200de73db5ebc412b8a745;p=libfirm

fix perl warning
---

diff --git a/ir/be/scripts/generate_emitter_new.pl b/ir/be/scripts/generate_emitter_new.pl
index d97530ea0..ed868f07e 100755
--- a/ir/be/scripts/generate_emitter_new.pl
+++ b/ir/be/scripts/generate_emitter_new.pl
@@ -52,7 +52,7 @@ sub create_emitter {
 	our %emit_templates;
 	our $arch;
 
-	if ($indent_line_func eq "") {
+	if (!defined($indent_line_func)) {
 		$template = "\\t" . $template;
 	} else {
 		push(@{$result}, "${indent}${indent_line_func};\n");