mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-18 01:39:25 +02:00
gtk2 intf: disable liboverlay by default
git-svn-id: trunk@37785 -
This commit is contained in:
parent
829e18886c
commit
50497fadce
1
.gitattributes
vendored
1
.gitattributes
vendored
@ -5867,6 +5867,7 @@ lcl/interfaces/gtk2/gtk2debug.pp svneol=native#text/pascal
|
|||||||
lcl/interfaces/gtk2/gtk2def.pp svneol=native#text/pascal
|
lcl/interfaces/gtk2/gtk2def.pp svneol=native#text/pascal
|
||||||
lcl/interfaces/gtk2/gtk2defines.inc svneol=native#text/plain
|
lcl/interfaces/gtk2/gtk2defines.inc svneol=native#text/plain
|
||||||
lcl/interfaces/gtk2/gtk2devicecontext.inc svneol=native#text/pascal
|
lcl/interfaces/gtk2/gtk2devicecontext.inc svneol=native#text/pascal
|
||||||
|
lcl/interfaces/gtk2/gtk2disableliboverlay.pas svneol=native#text/plain
|
||||||
lcl/interfaces/gtk2/gtk2extra.inc svneol=native#text/pascal
|
lcl/interfaces/gtk2/gtk2extra.inc svneol=native#text/pascal
|
||||||
lcl/interfaces/gtk2/gtk2extra.pp svneol=native#text/pascal
|
lcl/interfaces/gtk2/gtk2extra.pp svneol=native#text/pascal
|
||||||
lcl/interfaces/gtk2/gtk2extrah.inc svneol=native#text/pascal
|
lcl/interfaces/gtk2/gtk2extrah.inc svneol=native#text/pascal
|
||||||
|
20
lcl/interfaces/gtk2/gtk2disableliboverlay.pas
Normal file
20
lcl/interfaces/gtk2/gtk2disableliboverlay.pas
Normal file
@ -0,0 +1,20 @@
|
|||||||
|
unit gtk2DisableLibOverlay;
|
||||||
|
|
||||||
|
{$mode objfpc}{$H+}
|
||||||
|
|
||||||
|
interface
|
||||||
|
|
||||||
|
uses
|
||||||
|
Classes, SysUtils;
|
||||||
|
|
||||||
|
implementation
|
||||||
|
|
||||||
|
uses
|
||||||
|
ctypes;
|
||||||
|
|
||||||
|
function setenv(name, value: PChar; replace: cint): cint; cdecl; external 'c';
|
||||||
|
|
||||||
|
initialization
|
||||||
|
setenv('LIBOVERLAY_SCROLLBAR', '0', 1);
|
||||||
|
end.
|
||||||
|
|
@ -34,6 +34,9 @@ uses
|
|||||||
implementation
|
implementation
|
||||||
|
|
||||||
uses
|
uses
|
||||||
|
{$IFNDEF EnableLibOverlay}
|
||||||
|
gtk2DisableLibOverlay,
|
||||||
|
{$ENDIF}
|
||||||
Gtk2Int, Forms;
|
Gtk2Int, Forms;
|
||||||
|
|
||||||
initialization
|
initialization
|
||||||
|
@ -121,7 +121,7 @@ end;"/>
|
|||||||
<License Value="modified LGPL-2
|
<License Value="modified LGPL-2
|
||||||
"/>
|
"/>
|
||||||
<Version Major="1" Release="1"/>
|
<Version Major="1" Release="1"/>
|
||||||
<Files Count="400">
|
<Files Count="401">
|
||||||
<Item1>
|
<Item1>
|
||||||
<Filename Value="carbon/agl.pp"/>
|
<Filename Value="carbon/agl.pp"/>
|
||||||
<AddToUsesPkgSection Value="False"/>
|
<AddToUsesPkgSection Value="False"/>
|
||||||
@ -1987,6 +1987,11 @@ end;"/>
|
|||||||
<AddToUsesPkgSection Value="False"/>
|
<AddToUsesPkgSection Value="False"/>
|
||||||
<UnitName Value="CustomDrawnWSMenus"/>
|
<UnitName Value="CustomDrawnWSMenus"/>
|
||||||
</Item400>
|
</Item400>
|
||||||
|
<Item401>
|
||||||
|
<Filename Value="gtk2/gtk2disableliboverlay.pas"/>
|
||||||
|
<AddToUsesPkgSection Value="False"/>
|
||||||
|
<UnitName Value="gtk2disableliboverlay"/>
|
||||||
|
</Item401>
|
||||||
</Files>
|
</Files>
|
||||||
<LazDoc Paths="../../docs/xml/lcl"/>
|
<LazDoc Paths="../../docs/xml/lcl"/>
|
||||||
<i18n>
|
<i18n>
|
||||||
|
Loading…
Reference in New Issue
Block a user