From 1a2f72b5f788fc30b4725261e520e5100ccb22e2 Mon Sep 17 00:00:00 2001
From: Jan Michel <j.michel@gsi.de>
Date: Fri, 3 Oct 2014 14:24:32 +0200
Subject: [PATCH] fixed xml-db bug in readonly regs

---
 xml-db/get.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/xml-db/get.pl b/xml-db/get.pl
index 8be211c..b905634 100755
--- a/xml-db/get.pl
+++ b/xml-db/get.pl
@@ -451,7 +451,7 @@ sub generateoutput {
       foreach my $b (sort keys %{$lastboards}) {
         my $ttmp = "";
         my $sl;
-        next unless defined $data->{$addr}->{$b};
+        next unless defined $data->{$addr}->{$b} || !($obj->{mode} =~ /r/);
         $sl = sprintf("<td class=\"slice\"><div>%i<span class=\"tooltip\"><b>$name.$slice</b> (0x%04x)</span></div>",$slice,$addr) if ($once != 1 && defined $obj->{repeat});
         
         $ttmp .= sprintf("<tr><td><div>%s<span class=\"tooltip\"><b>$name</b> on 0x%s<br>raw: 0x%x</span></div>%s",$b,$b,$data->{$addr}->{$b},$sl);
-- 
2.43.0