From 3745cacf885f18639ff514757afd780facaf7e14 Mon Sep 17 00:00:00 2001
From: Paul Buetow <paul@buetow.org>
Date: Wed, 11 Jul 2012 08:47:40 +0200
Subject: remove --factor switch

---
 lib/Loadbars/Main.pm | 11 -----------
 1 file changed, 11 deletions(-)

(limited to 'lib/Loadbars/Main.pm')

diff --git a/lib/Loadbars/Main.pm b/lib/Loadbars/Main.pm
index 2447acd..ff03411 100644
--- a/lib/Loadbars/Main.pm
+++ b/lib/Loadbars/Main.pm
@@ -1,4 +1,3 @@
-
 package Loadbars::Main;
 
 use strict;
@@ -49,7 +48,6 @@ sub percentage_norm ($$$) {
 sub norm ($) {
     my $n = shift;
 
-    return $n if $C{factor} != 1;
     return $n > 100 ? 100 : ( $n < 0 ? 0 : $n );
 }
 
@@ -579,15 +577,6 @@ sub loop ($@) {
                 $C{cpuaverage} = $avg > 1 ? $avg : 2;
                 display_info "Set sample cpu average $C{cpuaverage}";
 
-            }
-            elsif ( $key_name eq 's' ) {
-                $C{factor} += 0.1;
-                display_info "Set scale factor to $C{factor}";
-            }
-            elsif ( $key_name eq 'x' or $key_name eq 'z' ) {
-                $C{factor} -= 0.1;
-                display_info "Set scale factor to $C{factor}";
-
             }
 
             elsif ( $key_name eq 'd' ) {
-- 
cgit v1.2.3