add post-export audition seeking

1 files changed, 9 insertions, 0 deletions

diff --git a/gtk2_ardour/export_report.cc b/gtk2_ardour/export_report.cc
index 1f443d1e05..894d12364e 100644
--- a/gtk2_ardour/export_report.cc
+++ b/gtk2_ardour/export_report.cc
@@ -554,6 +554,7 @@ ExportReport::ExportReport (Session* session, StatusPtr s)
 			ytme->flush ();
 			CimgArea *tm = manage (new CimgArea (ytme));
 			tm->set_audition_axis (m_l, width);
+			tm->seek_playhead.connect (sigc::bind<0> (sigc::mem_fun (*this, &ExportReport::audition_seek), page));
 			timeline.push_back (tm);
 			vb->pack_start (*tm);
 		} else {
@@ -764,3 +765,11 @@ ExportReport::audition_progress (framecnt_t pos, framecnt_t len)
 		timeline[_audition_num]->set_playhead ((float)pos / len);
 	}
 }
+
+void
+ExportReport::audition_seek (int page, float pos)
+{
+	if (_audition_num == page && _session) {
+		_session->the_auditioner()->seek_to_percent (100.f * pos);
+	}
+}