mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-29 23:10:16 +02:00
LCL-GTK2: Fix variable in DebugLn.
git-svn-id: trunk@60147 -
This commit is contained in:
parent
fe2dc6c054
commit
e1ba14fc97
@ -7539,7 +7539,7 @@ begin
|
|||||||
try
|
try
|
||||||
TypeAtom := ClipboardTypeAtoms[ClipboardType];
|
TypeAtom := ClipboardTypeAtoms[ClipboardType];
|
||||||
{$IFDEF DEBUG_CLIPBOARD}
|
{$IFDEF DEBUG_CLIPBOARD}
|
||||||
DebugLn('[RequestSelectionData] TimeID=',dbgs(TimeID),' Type=',GdkAtomToStr(Atom),' FormatID=',GdkAtomToStr(FormatID));
|
DebugLn('[RequestSelectionData] TimeID=',dbgs(TimeID),' Type=',GdkAtomToStr(TypeAtom),' FormatID=',GdkAtomToStr(FormatID));
|
||||||
{$ENDIF}
|
{$ENDIF}
|
||||||
if gtk_selection_convert(ClipboardWidget,TypeAtom,FormatID,TimeID) <> GdkFalse then
|
if gtk_selection_convert(ClipboardWidget,TypeAtom,FormatID,TimeID) <> GdkFalse then
|
||||||
begin
|
begin
|
||||||
|
Loading…
Reference in New Issue
Block a user