diff --git a/C4/Dates.pm b/C4/Dates.pm
index 320d04d62b..a602d311ed 100644
--- a/C4/Dates.pm
+++ b/C4/Dates.pm
@@ -98,7 +98,7 @@ sub init ($;$$) {
 }
 sub output ($;$) {
 	my $self = shift;
-	my $newformat = (@_) ? _recognize_format(shift) : $self->{'dateformat'} ;
+	my $newformat = (@_) ? _recognize_format(shift) : $prefformat;
 	return (eval {POSIX::strftime($posix_map{$newformat}, @self::dmy_array)} || undef);
 }
 sub today ($;$) {		# NOTE: sets date value to today (and returns it in the requested or current format)
diff --git a/members/moremember.pl b/members/moremember.pl
index 405cb99a4b..2145d9b9bd 100755
--- a/members/moremember.pl
+++ b/members/moremember.pl
@@ -96,7 +96,7 @@ my $category_type = $borrowercategory->{'category_type'};
 $template->param( $data->{'categorycode'} => 1 ); 
 
 foreach (qw(dateenrolled dateexpiry dateofbirth)) {
-		my $tempdate = C4::Dates->new($data->{$_})->output('iso')
+		my $tempdate = C4::Dates->new($data->{$_},'iso')->output
 			or warn ("Invalid $_ = " . $data->{$_});
 		$data->{$_} = $tempdate || '';
 }