From: Carl Hetherington <carl@carlh.net>
Date: Mon, 8 Aug 2011 15:36:16 +0000 (+0000)
Subject: Set new region length correctly after stretch (part of
X-Git-Tag: 3.0-alpha10~32
X-Git-Url: https://main.carlh.net/gitweb/?a=commitdiff_plain;h=2b2d49fffae72bd2081e783ebe1fc3064b79653f;p=ardour.git

Set new region length correctly after stretch (part of
#3908).


git-svn-id: svn://localhost/ardour2/branches/3.0@9963 d708f5d6-7413-0410-9779-e7cbd77b26cf
---

diff --git a/libs/ardour/rb_effect.cc b/libs/ardour/rb_effect.cc
index bc040709f4..e90149926c 100644
--- a/libs/ardour/rb_effect.cc
+++ b/libs/ardour/rb_effect.cc
@@ -355,7 +355,10 @@ RBEffect::run (boost::shared_ptr<Region> r, Progress*)
 					  stretch,
 					  shift);
 		(*x)->set_master_sources (region->master_sources());
-		(*x)->set_length( (*x)->length() * stretch);
+		/* multiply the old (possibly previously stretched) region length by the extra
+		   stretch this time around to get its new length
+		*/
+		(*x)->set_length ((*x)->length() * tsr.time_fraction);
 	}
 
 	/* stretch region gain envelope */