commit c515bbe538d4c4deeb16f935d2dce23a82b84bd4
Author: Kornel Benko <kor...@lyx.org>
Date: Thu Apr 3 10:53:24 2025 +0200
ctest check_Qt_ui_Constants
Make the log of this test more understandable
---
development/autotests/checkQtConstants.pl | 13 ++++++++++++-
1 file changed, 12 insertions(+), 1 deletion(-)
diff --git a/development/autotests/checkQtConstants.pl
b/development/autotests/checkQtConstants.pl
index c3aac50717..85685ed0d0 100644
--- a/development/autotests/checkQtConstants.pl
+++ b/development/autotests/checkQtConstants.pl
@@ -1,6 +1,11 @@
#! /usr/bin/env perl
# -*- mode: perl; -*-
#
+# Checking for allowed Qt constants in src/frontends/qt/ui/*.ui
+# Allowed form: Q[A_Za-z]+::[A-Za-z]+
+# See https://doc.qt.io/qt-6/qt.html
+# Therefore, forms like Q[A_Za-z]+(::[A-Za-z]+){2,} are considered not allowed.
+#
use strict;
use warnings;
@@ -18,10 +23,16 @@ sub collectUiFiles($$);
my @UIFiles = ();
collectUiFiles('.', \@UIFiles);
-
+print "Checking Qt constants according to https://doc.qt.io/qt-6/qt.html\n";;
for my $ui (@UIFiles) {
checkConstants($ui);
}
+if ($no_founds == 0) {
+ print "...\nNo offending values found\n";
+}
+else {
+ print "$no_founds places with questionable names for qt-constants found\n";
+}
exit($no_founds);
###########################################
--
lyx-cvs mailing list
lyx-cvs@lists.lyx.org
https://lists.lyx.org/mailman/listinfo/lyx-cvs
