From 0a71cc8cae5f31b9d8ab72cbcb6a3fa5cfdf5d97 Mon Sep 17 00:00:00 2001
From: Matthias Neeracher <neeri@users.sourceforge.net>
Date: Sat, 5 Jul 2008 14:04:01 +0000
Subject: [PATCH] Gentler rate scaling

---
 Sources/VLDocument.mm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/Sources/VLDocument.mm b/Sources/VLDocument.mm
index 4826dbf..a081a5c 100644
--- a/Sources/VLDocument.mm
+++ b/Sources/VLDocument.mm
@@ -566,8 +566,8 @@
 {
 	const float kMaxRate	= 8.0f;
 	const float kMinRate	= 0.2f;
-	const float kUpScale	= 1.2f;
-	const float kDownScale  = 0.8f;
+	const float kUpScale	= 1.1f;
+	const float kDownScale  = 1.0f/kUpScale;
 	bool nowPlaying = VLSoundOut::Instance()->Playing();
 	switch (int tag = [sender tag]) {
 	case 0: // Play
@@ -666,3 +666,4 @@
 }
 
 @end
+