netsurf/!NetSurf/!Boot,feb
James Bursa 3a48308967 [project @ 2004-08-03 22:42:58 by bursa]
Add some File$Type_xxx system variables.

svn path=/import/netsurf/; revision=1178
2004-08-03 22:42:58 +00:00

42 lines
1.6 KiB
Plaintext

Set NetSurf$Dir <Obey$Dir>
Set File$Type_695 GIF
Set File$Type_B60 PNG
Set File$Type_C85 JPEG
Set File$Type_F78 JNG
Set File$Type_F79 CSS
Set File$Type_F83 MNG
Set File$Type_FAF HTML
| Application system variables
Set NetSurf$Help <NetSurf$Dir>.Docs.docs_en
Set NetSurf$Version "Development Build"
Set NetSurf$Web "http://netsurf.sourceforge.net/"
Set NetSurf$Title "NetSurf"
Set NetSurf$Publisher "The NetSurf Developers"
Set NetSurf$Description "Web browser"
| NetSurf Sprites
Set NetSurf$Sprites <NetSurf$Dir>.!Sprites
RMEnsure UtilityModule 5.00 Set NetSurf$Sprites <NetSurf$Dir>.!SpritesA
RMEnsure UtilityModule 4.37 Set NetSurf$Sprites <NetSurf$Dir>.!Sprites
IconSprites <NetSurf$Sprites>
Unset NetSurf$Sprites
| Acorn URI protocol
If "<Alias$Open_URI_http>" = "" Then Set Alias$Open_URI_http <NetSurf$Dir>.URILaunch
If "<Alias$Open_URI_https>" = "" Then Set Alias$Open_URI_https <NetSurf$Dir>.URILaunch
If "<Alias$Open_URI_file>" = "" Then Set Alias$Open_URI_file <NetSurf$Dir>.URILaunch
| ANT URI protocol
| Not yet ;)
|If "" = "<Alias$URLOpen_http>" Then Set Alias$URLOpen_http <NetSurf$Dir>.URILaunch %%*0
|If "" = "<Alias$URLOpen_https>" Then Set Alias$URLOpen_https <NetSurf$Dir>.URILaunch %%*0
|If "" = "<Alias$URLOpen_file>" Then Set Alias$URLOpen_file <NetSurf$Dir>.URILaunch %%*0
| Claim HTML and URI files
| Not Yet ;)
|If "" = "<Alias$@RunType_FAF>" Then Set Alias$@RunType_FAF <NetSurf$Dir>.URILaunch
|If "" = "<Alias$@RunType_B28>" Then Set Alias$@RunType_B28 <NetSurf$Dir>.URILaunch
|If "" = "<FTPc$Dir>" Then If "<Alias$@RunType_F91>" = "" Then Set Alias$@RunType_F91 <NetSurf$Dir>.URILaunch