From 1f1a83c0838a0d4e97cbc32e51d40210714b198f Mon Sep 17 00:00:00 2001
From: John Wiegley <johnw@newartisans.com>
Date: Thu, 19 Feb 2009 13:40:48 -0400
Subject: Restored the -j and -J options

---
 src/report.cc | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'src/report.cc')

diff --git a/src/report.cc b/src/report.cc
index d1ee635e..7ba9ac2f 100644
--- a/src/report.cc
+++ b/src/report.cc
@@ -143,6 +143,11 @@ value_t report_t::fn_strip(call_scope_t& args)
   return args[0].strip_annotations(what_to_keep());
 }
 
+value_t report_t::fn_quantity(call_scope_t& args)
+{
+  return args[0].to_amount().number();
+}
+
 value_t report_t::fn_truncate(call_scope_t& args)
 {
   var_t<long> width(args, 1);
@@ -602,6 +607,8 @@ expr_t::ptr_op_t report_t::lookup(const string& name)
   case 'q':
     if (is_eq(p, "quoted"))
       return MAKE_FUNCTOR(report_t::fn_quoted);
+    else if (is_eq(p, "quantity"))
+      return MAKE_FUNCTOR(report_t::fn_quantity);
     break;
 
   case 's':
-- 
cgit v1.2.3