[hcoop-cvs] portal/remind remind.sml,1.14,1.15

[Adam C. <ad...@us...>]

Update of /cvsroot/hcoop/portal/remind
In directory sfp-cvsdas-1.v30.ch3.sourceforge.com:/tmp/cvs-serv19950/remind

Modified Files:
	remind.sml 
Log Message:
Fold dues increase into portal

Index: remind.sml
===================================================================
RCS file: /cvsroot/hcoop/portal/remind/remind.sml,v
retrieving revision 1.14
retrieving revision 1.15
diff -C2 -d -r1.14 -r1.15
*** remind.sml	11 May 2008 11:39:27 -0000	1.14
--- remind.sml	24 Nov 2009 13:36:43 -0000	1.15
***************
*** 12,16 ****
  	Real.fmt (StringCvt.FIX (SOME 2)) n
  
! val basePerMonth = 5.0
  val deposit = basePerMonth * 3.0
  
--- 12,16 ----
  	Real.fmt (StringCvt.FIX (SOME 2)) n
  
! val basePerMonth = 7.0
  val deposit = basePerMonth * 3.0
  
***************
*** 78,82 ****
  			write (printReal (headsUp - amount));
  
! 			write "\n\nThe deposit requirement was calculated as three months of dues at $5/mo..\n\n";
  
  			write "To make a payment, visit:\n";
--- 78,82 ----
  			write (printReal (headsUp - amount));
  
! 			write "\n\nThe deposit requirement was calculated as three months of dues at $7/mo..\n\n";
  
  			write "To make a payment, visit:\n";