editors/lazarus-*: Fix issues with Qt5/Qt6

- Bump PORTREVISION
Obtained from:	https://gitlab.com/freepascal.org/lazarus/lazarus/-/issues/40246
This commit is contained in:
Jose Alonso Cardenas Marquez 2024-05-04 01:37:02 -05:00
parent e3d3a9cd2e
commit 2ccd6b5da7
No known key found for this signature in database
GPG key ID: 335B9246BA5E30F4
8 changed files with 51 additions and 4 deletions

View file

@ -1,7 +1,7 @@
PORTNAME= lazarus
DISTVERSION= 3.3.1.20240503
PKGNAMESUFFIX?= -gtk2-devel
PORTREVISION?= 0
PORTREVISION?= 1
CATEGORIES= editors devel
DIST_SUBDIR= freepascal

View file

@ -0,0 +1,11 @@
--- lcl/interfaces/qt5/qtwidgets.pas.orig 2024-05-04 05:19:24 UTC
+++ lcl/interfaces/qt5/qtwidgets.pas
@@ -10213,7 +10213,7 @@ end;
procedure TQtTextEdit.setReadOnly(const AReadOnly: Boolean);
begin
- {$IFDEF DARWIN} // issue #40246
+ {$IF DEFINED(DARWIN) OR DEFINED(FREEBSD)} // issue #40246
if AReadOnly <> QTextEdit_isReadOnly(QTextEditH(Widget)) then
{$ENDIF}
QTextEdit_setReadOnly(QTextEditH(Widget), AReadOnly);

View file

@ -0,0 +1,11 @@
--- lcl/interfaces/qt6/qtwidgets.pas.orig 2024-05-04 04:27:27 UTC
+++ lcl/interfaces/qt6/qtwidgets.pas
@@ -10245,7 +10245,7 @@ end;
procedure TQtTextEdit.setReadOnly(const AReadOnly: Boolean);
begin
- {$IFDEF DARWIN} // issue #40246
+ {$IF DEFINED(DARWIN) OR DEFINED(FREEBSD)} // issue #40246
if AReadOnly <> QTextEdit_isReadOnly(QTextEditH(Widget)) then
{$ENDIF}
QTextEdit_setReadOnly(QTextEditH(Widget), AReadOnly);

View file

@ -1,4 +1,4 @@
PORTREVISION= 0
PORTREVISION= 1
PKGNAMESUFFIX?= -qt5

View file

@ -1,4 +1,4 @@
PORTREVISION= 1
PORTREVISION= 2
PKGNAMESUFFIX?= -qt6

View file

@ -1,7 +1,7 @@
PORTNAME= lazarus
DISTVERSION= 3.2.0
PKGNAMESUFFIX?= -gtk2
PORTREVISION?= 0
PORTREVISION?= 1
CATEGORIES= editors devel
DIST_SUBDIR= freepascal

View file

@ -0,0 +1,11 @@
--- lcl/interfaces/qt5/qtwidgets.pas.orig 2024-05-04 04:39:55 UTC
+++ lcl/interfaces/qt5/qtwidgets.pas
@@ -10213,7 +10213,7 @@ begin
procedure TQtTextEdit.setReadOnly(const AReadOnly: Boolean);
begin
- {$IFDEF DARWIN} // issue #40246
+ {$IF DEFINED(DARWIN) OR DEFINED(FREEBSD)} // issue #40246
if AReadOnly <> QTextEdit_isReadOnly(QTextEditH(Widget)) then
{$ENDIF}
QTextEdit_setReadOnly(QTextEditH(Widget), AReadOnly);

View file

@ -0,0 +1,14 @@
--- lcl/interfaces/qt6/qtwidgets.pas.orig 2024-05-04 05:06:13 UTC
+++ lcl/interfaces/qt6/qtwidgets.pas
@@ -10243,7 +10243,10 @@ begin
procedure TQtTextEdit.setReadOnly(const AReadOnly: Boolean);
begin
- QTextEdit_setReadOnly(QTextEditH(Widget), AReadOnly);
+ {$IF DEFINED(DARWIN) OR DEFINED(FREEBSD)} // issue #40246
+ if AReadOnly <> QTextEdit_isReadOnly(QTextEditH(Widget)) then
+ {$ENDIF}
+ QTextEdit_setReadOnly(QTextEditH(Widget), AReadOnly);
end;
procedure TQtTextEdit.setSelection(const AStart, ALength: Integer);