From 7b860b244ec42a96927cda4d548f2aa18794dbaf Mon Sep 17 00:00:00 2001
From: Jan Schneider <oss@janschneider.net>
Date: Fri, 7 Feb 2020 19:28:59 +0100
Subject: [PATCH] Fix get_rpi_version

---
 addon/lib/rmupdate.tcl | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/addon/lib/rmupdate.tcl b/addon/lib/rmupdate.tcl
index ca1eb38..c3196ac 100644
--- a/addon/lib/rmupdate.tcl
+++ b/addon/lib/rmupdate.tcl
@@ -111,6 +111,9 @@ proc ::rmupdate::get_rpi_version {} {
 		close $fd
 		foreach d [split $data "\n"] {
 			if {[regexp {^HM_HOST='([^']+)'} $d match host]} {
+				if {[regexp {^(rpi\d)} $host match rpi_host]} {
+					return $rpi_host
+				}
 				return $host
 			}
 		}