From 3062cbec03e400b364336a712ffc8307b46f1522 Mon Sep 17 00:00:00 2001
From: wp_xxyyzz <wp_xxyyzz@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Tue, 9 Jan 2018 19:39:55 +0000
Subject: [PATCH] orpheus: Fix compilation with Laz 1.8/1.9

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6123 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/orpheus/mymisc.pas | 5 +++++
 components/orpheus/ovccal.pas | 4 ++++
 2 files changed, 9 insertions(+)

diff --git a/components/orpheus/mymisc.pas b/components/orpheus/mymisc.pas
index da5372a67..5accad702 100644
--- a/components/orpheus/mymisc.pas
+++ b/components/orpheus/mymisc.pas
@@ -353,6 +353,11 @@ function GetBrowserPath : string;
 
 implementation
 
+{$IFDEF LCL}
+uses
+  LCLPlatformDef ;
+{$ENDIF}
+
  {These functions belong in LclIntf unit}
 
 function IsCharAlpha(c : Char) : Boolean;
diff --git a/components/orpheus/ovccal.pas b/components/orpheus/ovccal.pas
index 4f928abd1..93943c9e5 100644
--- a/components/orpheus/ovccal.pas
+++ b/components/orpheus/ovccal.pas
@@ -412,6 +412,10 @@ type
 
 implementation
 
+{$IFDEF LCL}
+uses
+  LazUTF8;
+{$ENDIF}
 
 const
   calMargin = 4; {left, right, and top margin}