From 89bc82e5cd85236e37883ed4189f3b2782416cbf Mon Sep 17 00:00:00 2001
From: "Michael H.G. Schmidt" <michael@schmidt2.de>
Date: Thu, 9 Mar 2023 21:13:11 +0100
Subject: [PATCH] .

---
 optional/install-chrome.cmd | 18 +++++++++++++-----
 source/minibrowser.pb       | 11 +++++------
 2 files changed, 18 insertions(+), 11 deletions(-)

diff --git a/optional/install-chrome.cmd b/optional/install-chrome.cmd
index 70bd530..6324d51 100644
--- a/optional/install-chrome.cmd
+++ b/optional/install-chrome.cmd
@@ -16,25 +16,33 @@ if NOT EXIST %SOFTWARE%\%MSI% (
 echo ####### %0 #######
 
 cd %SOFTWARE%
-@echo on
 msiexec /uninstall %MSI% /passive
+@echo on
 msiexec /i %MSI% /passive
 @echo off
 cd %OPT%
 
-echo renaming Chrome desktop shortcut ...
-move /Y %PUBLIC%\Desktop\"Google Chrome.lnk" %PUBLIC%\Desktop\Chrome.lnk 2>nul
-
 echo importing registry settings ...
 reg import %CONFIG%
 
-rem unpin chrome icon frpom taskbar ...
+rem unpin chrome icon from taskbar ...
+echo.
 call %SCRIPTS%\unpin-taskbar-icons.cmd
+echo.
 
 echo disabling update tasks ...
 schtasks /Change /TN "GoogleUpdateTaskMachineCore{FF03DE7D-B6BB-4BD9-B599-5500A9284F84}" /disable
 schtasks /Change /TN "GoogleUpdateTaskMachineUA{947CFA0A-AC3E-424D-99CD-38EE819AB072}" /disable
 
+echo renaming chrome desktop shortcut ...
+move /Y %PUBLIC%\Desktop\"Google Chrome.lnk" %PUBLIC%\Desktop\Chrome.lnk 2>nul
+
+echo sleeping 5 seconds ...
+ping 127.0.0.1 -n 5 > NUL 2>&1
+
+echo cleanup ...
+del /F /Q "%USERPROFILE%\Desktop\Google Chrome.lnk" 2>nul
+
 rem refresh desktop (W10 style)
 ie4uinit.exe -show
 
diff --git a/source/minibrowser.pb b/source/minibrowser.pb
index d732312..7b4f81c 100644
--- a/source/minibrowser.pb
+++ b/source/minibrowser.pb
@@ -5,14 +5,14 @@
 ; LICENSE  : GPL
 ; AUTHOR   : Michael H.G. Schmidt
 ; EMAIL    : michael@schmidt2.de
-; DATE     : 20230214
+; DATE     : 20230309
 ; ------------------------------------------------------------
 ;
 
 
 ; VARIABLES
 Global Security=#True
-Global DefaultStartPage$="http://Bing.de"
+Global DefaultStartPage$="https://duckduckgo.com"
 Global StartPage$=DefaultStartPage$
 
 Procedure ResizeWebWindow()
@@ -94,7 +94,7 @@ If OpenWindow(0, 100, 200, 800, 600, "MiniBrowser", #PB_Window_MinimizeGadget |
   ButtonGadget(5, 0, 3, 25, 25, "Go")
   FrameGadget(6, 0, 30, 0, 2, "", 2) ; Nice little separator
   
-  WebGadget(10, 1, 37, 1278, 732,"")
+  WebGadget(10, 1, 37, 1278, 732, "")
   AddKeyboardShortcut(0, #PB_Shortcut_Return, 0)
   
   ; Use bindevent() to have a realtime window resize
@@ -125,7 +125,7 @@ If OpenWindow(0, 100, 200, 800, 600, "MiniBrowser", #PB_Window_MinimizeGadget |
         EndSelect
         
       Case #PB_Event_Menu ; We only have one shortcut
-        SetGadgetText(10, GetGadgetText(4)) 
+        SetGadgetText(10, GetGadgetText(4))
     
     EndSelect
     
@@ -134,8 +134,7 @@ If OpenWindow(0, 100, 200, 800, 600, "MiniBrowser", #PB_Window_MinimizeGadget |
 EndIf
 
 ; IDE Options = PureBasic 5.73 LTS (Windows - x64)
-; CursorPosition = 98
-; FirstLine = 77
+; CursorPosition = 16
 ; Folding = -
 ; EnableXP
 ; UseIcon = internet_free_icon.ico