Mercurial > pub > Impl

diff Lib/IMPL/lang.pm @ 169:fd92830036c3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
corrected IMPL::SQL::Schema::Diff
author sourcer
date Tue, 17 May 2011 00:04:28 +0400
parents 6148f89bb7bf
children aaab45153411
line wrap: on
line diff
--- a/Lib/IMPL/lang.pm	Mon May 16 04:30:38 2011 +0400
+++ b/Lib/IMPL/lang.pm	Tue May 17 00:04:28 2011 +0400
@@ -141,7 +141,8 @@
 sub hashDiff {
 	my ($src,$dst) = @_;
 	
-	$dst = { %$dst };
+	$dst = $dst ? { %$dst } : {} ;
+	$src ||= {};
 	
 	my %result;