From 2b5292eaa5c70babb5765f4527d0f3332b11068f Mon Sep 17 00:00:00 2001
From: stan <stan@e3e1d417-86f3-4887-817a-d78f3d33393f>
Date: Thu, 19 Oct 2006 15:56:01 +0000
Subject: [PATCH] Bug 372 - Videoed flag now gets set after video created.

git-svn-id: http://svn.zoneminder.com/svn/zm/trunk@2020 e3e1d417-86f3-4887-817a-d78f3d33393f
---
 scripts/zmfilter.pl | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/scripts/zmfilter.pl b/scripts/zmfilter.pl
index eaaf09c34..a46f59005 100644
--- a/scripts/zmfilter.pl
+++ b/scripts/zmfilter.pl
@@ -663,9 +663,15 @@ sub generateVideo
 		}
 		return( 0 );
 	}
-	if ( wantarray() )
+	else
 	{
-		return( $format, sprintf( "%d/%d/%s", $event->{MonitorId}, $event->{Id}, $output ) );
+		my $sql = "update Events set Videoed = 1 where Id = ?";
+		my $sth = $dbh->prepare_cached( $sql ) or Fatal( "Can't prepare '$sql': ".$dbh->errstr() );
+		my $res = $sth->execute( $event->{Id} ) or Fatal( "Can't execute '$sql': ".$sth->errstr() );
+	    if ( wantarray() )
+	    {
+		    return( $format, sprintf( "%d/%d/%s", $event->{MonitorId}, $event->{Id}, $output ) );
+	    }
 	}
 	return( 1 );
 }