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