From 9e343fee7d8da6c7126ca08da9aa64766c7b3835 Mon Sep 17 00:00:00 2001
From: Solomon Foster <colomon@gmail.com>
Date: Mon, 31 Aug 2009 21:39:58 -0400
Subject: [PATCH] Fix Rat.perl to return "N/M" rather than "Rat.new(N,M)".

---
 src/setting/Rat.pm |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/src/setting/Rat.pm b/src/setting/Rat.pm
index ba73dac..06f08f3 100644
--- a/src/setting/Rat.pm
+++ b/src/setting/Rat.pm
@@ -25,7 +25,7 @@ class Rat {
         self.bless(*, :$numerator, :$denominator);
     }
     
-    multi method perl() { "Rat.new($!numerator, $!denominator)"; }
+    multi method perl() { "$!numerator/$!denominator"; }
 
     multi method Str() { "$!numerator/$!denominator"; }
 
-- 
1.6.0.5