From 13a6b796fd950e918463c8d6214617a89ce2cf48 Mon Sep 17 00:00:00 2001
From: chris <chris>
Date: Sat, 8 Jan 2000 22:43:39 +0000
Subject: [PATCH] check

---
 newmember.pl | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/newmember.pl b/newmember.pl
index 04d00d4..a968773 100755
--- a/newmember.pl
+++ b/newmember.pl
@@ -76,9 +76,13 @@ if ($insert eq ''){
    print mktablerow(2,'white',bold('Membership Category'),$data{'category'});
    print mktablerow(2,'white',bold('Area'),$data{'area'});
    print mktablerow(2,'white',bold('Fee'),$data{'fee'});
-   $data{'joining'}=ParseDate('today');
+   if ($data{'joining'} eq ''){
+     $data{'joining'}=ParseDate('today');
+   }
    print mktablerow(2,'white',bold('Joining Date'),$data{'joining'});
-   $data{'expiry'}=ParseDate('in 1 year');
+   if ($data{'expiry'} eq ''){
+     $data{'expiry'}=ParseDate('in 1 year');
+   }
    print mktablerow(2,'white',bold('Expiry Date'),$data{'expiry'});
    print mktablerow(2,'white',bold('Joining Branch'),$data{'joinbranch'});
    print mktablerow(2,$main,bold('PERSONAL DETAILS'),"",$image);