mirror of
https://github.com/netsurf-browser/netsurf
synced 2024-12-21 03:32:35 +03:00
Fix copying of the wrong .readme during installation.
Abort with a message if the archive doesn't match the OS version.
This commit is contained in:
parent
55b9a12785
commit
2108697533
23
amiga/dist/Install
vendored
23
amiga/dist/Install
vendored
@ -39,9 +39,28 @@
|
|||||||
;;; Script execution starts here ;;;
|
;;; Script execution starts here ;;;
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
|
|
||||||
|
(set osver (getversion))
|
||||||
|
(set osver (/ osver 65536))
|
||||||
|
|
||||||
(if (= @app-name "NetSurfAutoInstall") (set #AutoInstall 1))
|
(if (= @app-name "NetSurfAutoInstall") (set #AutoInstall 1))
|
||||||
(set @app-name "NetSurf")
|
(set @app-name "NetSurf")
|
||||||
|
|
||||||
|
(set #netsurf-readme "NetSurf.readme")
|
||||||
|
(if (= (exists #netsurf-readme) 0)
|
||||||
|
(
|
||||||
|
(set #netsurf-readme "NetSurf_os3.readme")
|
||||||
|
(if (OR (>= osver 50) (< osver 44))
|
||||||
|
(abort "This archive is for AmigaOS 3.5 or 3.9 ONLY.")
|
||||||
|
)
|
||||||
|
)
|
||||||
|
;else
|
||||||
|
(
|
||||||
|
(if (< osver 50)
|
||||||
|
(abort "This archive is for AmigaOS 4.0 and higher ONLY.")
|
||||||
|
)
|
||||||
|
)
|
||||||
|
)
|
||||||
|
|
||||||
(if (<> #AutoInstall 1) (welcome))
|
(if (<> #AutoInstall 1) (welcome))
|
||||||
|
|
||||||
; (hopefully temporary) workaround for a bug in Installer:
|
; (hopefully temporary) workaround for a bug in Installer:
|
||||||
@ -80,8 +99,6 @@
|
|||||||
|
|
||||||
(working "Checking existing installation...")
|
(working "Checking existing installation...")
|
||||||
(set #icon-exists (exists (tackon @default-dest "NetSurf.info")))
|
(set #icon-exists (exists (tackon @default-dest "NetSurf.info")))
|
||||||
(set osver (getversion))
|
|
||||||
(set osver (/ osver 65536))
|
|
||||||
|
|
||||||
(complete 10)
|
(complete 10)
|
||||||
|
|
||||||
@ -203,7 +220,7 @@
|
|||||||
(copyfiles
|
(copyfiles
|
||||||
(prompt "Copying files")
|
(prompt "Copying files")
|
||||||
(source "")
|
(source "")
|
||||||
(choices "Resources" "Rexx" "NetSurf.guide" "NetSurf.readme")
|
(choices "Resources" "Rexx" "NetSurf.guide" #netsurf-readme)
|
||||||
(help @copyfiles-help)
|
(help @copyfiles-help)
|
||||||
(dest @default-dest)
|
(dest @default-dest)
|
||||||
(infos)
|
(infos)
|
||||||
|
Loading…
Reference in New Issue
Block a user