summaryrefslogtreecommitdiff
path: root/audio/easymp3gain/patches/02_fix-new-fpc-compile.patch
diff options
context:
space:
mode:
Diffstat (limited to 'audio/easymp3gain/patches/02_fix-new-fpc-compile.patch')
-rw-r--r--audio/easymp3gain/patches/02_fix-new-fpc-compile.patch16
1 files changed, 16 insertions, 0 deletions
diff --git a/audio/easymp3gain/patches/02_fix-new-fpc-compile.patch b/audio/easymp3gain/patches/02_fix-new-fpc-compile.patch
new file mode 100644
index 0000000000..3d2994f4dc
--- /dev/null
+++ b/audio/easymp3gain/patches/02_fix-new-fpc-compile.patch
@@ -0,0 +1,16 @@
+Description: Fix compilation with more recent versions of FPC
+ This also improves code-quality and fixes warnings.
+Forwarded: yes
+Author: Matthias Klumpp <mak@debian.org>
+
+--- a/unitmain.pas
++++ b/unitmain.pas
+@@ -169,7 +169,7 @@
+ procedure AddFileAndDirectoryList(SL: TStringList; sublevels: Integer);
+ procedure UpdateFileCount;
+ procedure SortListView(Lv:TListView; Index:integer; Reverse: Boolean);
+- function AddTask(ASongItem: TSongItem; AMediaGainAction: TMediaGainAction; AVolume: Double): Integer;
++ function AddTask(ASongItem: TSongItem; AMediaGainAction: TMediaGainAction; AVolume: Double): Integer; overload;
+ function FitsTaskType(ATask: TMediaGainTask; AMediaGainAction: TMediaGainAction; ASongItem: TSongItem): Boolean;
+ { private declarations }
+ public