ports/editors/lazarus-devel/files/patch-lcl_interfaces_qt5_qtwidgets.pas
2024-05-04 01:54:24 -05:00

11 lines
435 B
ObjectPascal

--- 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);