Index: IR.pm
===================================================================
--- IR.pm	(revision 15439)
+++ IR.pm	(working copy)
@@ -254,13 +254,27 @@
 	my ($mode, $mapRef) = @_;
 
 	if (exists $irMap{$defaultMapFile}{$mode}) {
-
-		# don't overwrite existing mappings
+		my $key;
+		my $value;
+		while(($key, $value) = each(%$mapRef)) {
+			if (exists($irMap{$defaultMapFile}{$mode}->{$key})) {
+				# future enhancement - make a menu of options if a key action is duplicated
+				$log->warn("ignoring [$mode] $key => $value");
+			}
+			else {
+				$log->info("mapping [$mode] $key => $value");
+				$irMap{$defaultMapFile}{$mode}->{$key} = $value;
+			}
+		}
 		return;
 	}
 
 	if (ref($mapRef) eq 'HASH') {
-
+		my $key;
+		my $value;
+		while(($key, $value) = each(%$mapRef)) {
+				$log->info("mapping [$mode] $key => $value");
+		}
 		$irMap{$defaultMapFile}{$mode} = $mapRef;
 	}
 }