From: Matt S Trout <mst@shadowcat.co.uk>
Date: Thu, 21 Mar 2019 04:12:54 +0000 (+0000)
Subject: simplify unop_postfix code
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=715b4e6a5c57d44ef8999fb2476e1d83c749ff93;p=scpubgit%2FQ-Branch.git

simplify unop_postfix code
---

diff --git a/lib/SQL/Abstract.pm b/lib/SQL/Abstract.pm
index 0661c77..9da3a1a 100644
--- a/lib/SQL/Abstract.pm
+++ b/lib/SQL/Abstract.pm
@@ -1082,9 +1082,7 @@ sub _render_op {
 
 sub _render_unop_postfix {
   my ($self, $op, $v) = @_;
-  my ($arg, @argh) = @$v;
-  puke "Argh" if @argh;
-  my ($expr_sql, @bind) = $self->render_aqt($arg);
+  my ($expr_sql, @bind) = $self->render_aqt($v->[0]);
   my $op_sql = $self->_sqlcase($op);
   return ($expr_sql.' '.$op_sql, @bind);
 }