From 2a3cb6dba18e3b5632d62f5b9e91c06caf1cde2c Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.burg@gmx.com>
Date: Thu, 22 Oct 2015 01:59:05 +0200
Subject: [PATCH] fix, linux version, to open a source from the mini explorer
 could lead to a mess in the project due to double backslash/rel path
 resoltion

---
 src/ce_miniexplorer.lfm | 6 +++---
 src/ce_miniexplorer.pas | 3 +++
 2 files changed, 6 insertions(+), 3 deletions(-)

diff --git a/src/ce_miniexplorer.lfm b/src/ce_miniexplorer.lfm
index c70dd7e5..b3407c4a 100644
--- a/src/ce_miniexplorer.lfm
+++ b/src/ce_miniexplorer.lfm
@@ -28,7 +28,7 @@ inherited CEMiniExplorerWidget: TCEMiniExplorerWidget
         AutoWidthLastColumn = True
         Columns = <        
           item
-            Width = 319
+            Width = 314
           end>
         ReadOnly = True
         ShowColumnHeaders = False
@@ -61,7 +61,7 @@ inherited CEMiniExplorerWidget: TCEMiniExplorerWidget
           Top = 32
           Width = 335
           Align = alTop
-          DefaultItemHeight = 18
+          DefaultItemHeight = 16
           Images = imgList
           ReadOnly = True
           ScrollBars = ssAutoBoth
@@ -88,7 +88,7 @@ inherited CEMiniExplorerWidget: TCEMiniExplorerWidget
           AutoWidthLastColumn = True
           Columns = <          
             item
-              Width = 319
+              Width = 314
             end>
           ReadOnly = True
           ShowColumnHeaders = False
diff --git a/src/ce_miniexplorer.pas b/src/ce_miniexplorer.pas
index 09b440bb..f31fd1da 100644
--- a/src/ce_miniexplorer.pas
+++ b/src/ce_miniexplorer.pas
@@ -298,6 +298,9 @@ begin
   if lstFiles.Selected.Data = nil then exit;
   fname := PString(lstFiles.Selected.Data)^;
   if not fileExists(fname) then exit;
+  {$IFNDEF WINDOWS}
+  fname := fname[2..length(fname)];
+  {$ENDIF}
   getMultiDocHandler.openDocument(fname);
 end;