aboutsummaryrefslogtreecommitdiff
path: root/editors/lazarus-devel/files/patch-lcl_interfaces_qt5_qtwidgets.pas
blob: 2a6d1a08d233cb8faebaa4a597afc392bfe1741b (plain) (blame)
1
2
3
4
5
6
7
8
9
10
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);