From 0cb0d14d960c2e94a620468317f5d08cd760a02e Mon Sep 17 00:00:00 2001
From: Jan Schneider <j.schneider@uib.de>
Date: Sun, 25 Oct 2020 10:55:38 +0100
Subject: [PATCH] Fix current version display

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

diff --git a/addon/lib/rmupdate.tcl b/addon/lib/rmupdate.tcl
index 7204ed9..815d3c5 100644
--- a/addon/lib/rmupdate.tcl
+++ b/addon/lib/rmupdate.tcl
@@ -1207,12 +1207,15 @@ proc ::rmupdate::get_firmware_info {} {
 			}
 		}
 	}
+	set versions [lsort -decreasing -command compare_versions $versions]
+	set latest [lindex $versions 0]
+	
 	if {$experimental_version != ""} {
 		if {[lsearch $versions $experimental_version] == -1} {
 			set tmp [split $experimental_version "-"]
 			# experimental version != latest version
 			lappend versions $experimental_version
-			if {[lindex $tmp 0] == $current} {
+			if {[lindex $tmp 0] == $current && $current != $latest} {
 				# assuming that experimental version is installed
 				set current $experimental_version
 			}