From 187b39842fb9dc15697024dc2b95c80004422b10 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Wed, 19 Aug 2009 19:03:05 +0000
Subject: [PATCH] helphtml example: fixed baseurl

git-svn-id: trunk@21328 -
---
 examples/helphtml/htmlhelp1.lpi | 15 ++++++---------
 examples/helphtml/unit1.pas     |  4 ++--
 2 files changed, 8 insertions(+), 11 deletions(-)

diff --git a/examples/helphtml/htmlhelp1.lpi b/examples/helphtml/htmlhelp1.lpi
index e391e187c0..11791a3bce 100644
--- a/examples/helphtml/htmlhelp1.lpi
+++ b/examples/helphtml/htmlhelp1.lpi
@@ -1,12 +1,13 @@
 <?xml version="1.0"?>
 <CONFIG>
   <ProjectOptions>
-    <PathDelim Value="/"/>
-    <Version Value="5"/>
+    <Version Value="7"/>
     <General>
+      <Flags>
+        <LRSInOutputDirectory Value="False"/>
+      </Flags>
       <SessionStorage Value="InProjectDir"/>
       <MainUnit Value="0"/>
-      <IconPath Value="./"/>
       <TargetFileExt Value=""/>
     </General>
     <PublishOptions>
@@ -33,9 +34,8 @@
       </Unit0>
       <Unit1>
         <Filename Value="unit1.pas"/>
-        <ComponentName Value="Form1"/>
         <IsPartOfProject Value="True"/>
-        <ResourceFilename Value="unit1.lrs"/>
+        <ComponentName Value="Form1"/>
         <UnitName Value="Unit1"/>
       </Unit1>
       <Unit2>
@@ -53,13 +53,10 @@
     </Units>
   </ProjectOptions>
   <CompilerOptions>
-    <Version Value="5"/>
+    <Version Value="8"/>
     <SearchPaths>
       <SrcPath Value="$(LazarusDir)/lcl/;$(LazarusDir)/lcl/interfaces/$(LCLWidgetType)/"/>
     </SearchPaths>
-    <CodeGeneration>
-      <Generate Value="Faster"/>
-    </CodeGeneration>
     <Linking>
       <Options>
         <Win32>
diff --git a/examples/helphtml/unit1.pas b/examples/helphtml/unit1.pas
index 7f16e00174..5aac997817 100644
--- a/examples/helphtml/unit1.pas
+++ b/examples/helphtml/unit1.pas
@@ -30,7 +30,7 @@
   How was the example created:
       Put a THTMLHelpDatabase on a form.
       Set AutoRegister to true.
-      Set KeywordPrefix to 'HTML/'                                an
+      Set KeywordPrefix to 'HTML/'
       Set BaseURL to 'file://html/'
 
       Put a THTMLBrowserHelpViewer on the form.
@@ -88,7 +88,7 @@ end;
 
 procedure TForm1.FormCreate(Sender: TObject);
 begin
-  HTMLHelpDatabase1.BaseURL:='/usr';
+  HTMLHelpDatabase1.BaseURL:='file://html';
 end;
 
 initialization