瀏覽代碼

Fix "Use of uninitialized value $val in concatenation (.) or string at ./push.pl line 82."

Tianon Gravi 10 年之前
父節點
當前提交
fb58df1b30
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      push.pl

+ 1 - 1
push.pl

@@ -79,7 +79,7 @@ sub get_form_bits {
 			$val = $e->attr('value');
 		}
 		
-		$val = trim('' . $val);
+		$val = trim('' . ($val // ''));
 		$val =~ s!\r\n|\r!\n!g;
 		
 		$ret->{$name} = $val;