From ffa2db9f1ad0184fc767d1946242e5f41b108208 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Sascha=20Sch=C3=A4fer?= <sascha.schaefer87@gmail.com>
Date: Thu, 6 Sep 2018 17:33:50 +0200
Subject: [PATCH] Fix for Issue #104: If the ribbon settings file is currently
 in use, and blocked for read access, an EFOpenError is raised that was
 previosly not caught.

---
 Lib/UIRibbon.pas | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/Lib/UIRibbon.pas b/Lib/UIRibbon.pas
index 5ed36bd..1cc7056 100644
--- a/Lib/UIRibbon.pas
+++ b/Lib/UIRibbon.pas
@@ -1124,6 +1124,8 @@ function TUIRibbon.LoadRibbonSettings(): boolean;
   except
     on E: EOleError do
       {$IFDEF DEBUG}raise;{$else}Exit(False);{$endif}
+    on E: EFOpenError do
+      {$IFDEF DEBUG}raise;{$else}Exit(False);{$endif}
   end;
   Exit(True);
 end;