Diffstat (limited to 'dev-lang/lazarus/files/lazarus-0.9.20-lcl-handle.patch') (more/less context) (ignore whitespace changes)
| -rw-r--r-- | dev-lang/lazarus/files/lazarus-0.9.20-lcl-handle.patch | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/dev-lang/lazarus/files/lazarus-0.9.20-lcl-handle.patch b/dev-lang/lazarus/files/lazarus-0.9.20-lcl-handle.patch new file mode 100644 index 0000000..772face --- a/dev/null +++ b/dev-lang/lazarus/files/lazarus-0.9.20-lcl-handle.patch @@ -0,0 +1,25 @@ + If LCLType is not included, then THandle is System.THandle + rather than LCLType.THandle. System.THandle is 32 bits wide. + +--- lazarus/lcl/interfaces/gtk/gtkwsdialogs.pp ++++ lazarus/lcl/interfaces/gtk/gtkwsdialogs.pp +@@ -29,7 +29,7 @@ + uses + {$IFDEF GTK2} Gtk2, Glib2, gdk2, {$ELSE} Gtk, gdk, Glib, {$ENDIF} + SysUtils, Classes, Controls, LMessages, InterfaceBase, graphics, +- Dialogs, WSDialogs, WSLCLClasses, gtkint, gtkproc, gtkwscontrols; ++ LCLType, Dialogs, WSDialogs, WSLCLClasses, gtkint, gtkproc, gtkwscontrols; + + type + +--- lazarus/lcl/widgetset/wsdialogs.pp ++++ lazarus/lcl/widgetset/wsdialogs.pp +@@ -44,7 +44,7 @@ + // To get as little as posible circles, + // uncomment only when needed for registration + //////////////////////////////////////////////////// +- Dialogs, ++ LCLType, Dialogs, + //////////////////////////////////////////////////// + WSLCLClasses, WSControls; + |