| !ZapBoot - executed when Zap is first seen by the filer
| $Id: !ZapBoot,feb,v 1.2 2001/12/13 18:49:50 ds Exp $

| Make Zap pirate previously claimed filetypes
Obey ZapCode:Config.KillEditor

| Setup
Set Alias$ZapSet Set Alias$Zap%%0Type IfVarSet %%1Type_%%%%0 Then Else Set %%1Type_%%%%0 %%*2

| Claim file type(s) only if not yet claimed
ZapSet Run Alias$@Run Run ZapCode:ZapRunFile |%|%|*0

ZapRunType FFF

| Claim external edits only if not yet claimed
ZapSet Edit Alias$@Edit Run <Zap$Dir>.!Run

ZapEditType FFF

| Claim linked and embedded objects only if not yet claimed
ZapSet OLE OLEServer$ -N Zap -R /<Zap$Dir>

ZapOLEType FFD
ZapOLEType FFF

