Stowage/cpython
2
0
Fork 0
mirror of https://github.com/python/cpython.git synced 2025-10-31 13:41:24 +00:00
Code Issues Projects Releases Packages Wiki Activity

Added List.slb alias

Browse source
This commit is contained in:
Jack Jansen 1995-08-14 12:20:22 +00:00
parent 3050a2dc5f
commit ad169272fb
2 changed files with 5 additions and 22 deletions
Download patch file Download diff file Expand all files Collapse all files

26
Mac/scripts/ConfigurePython.py
View file

@ -28,6 +28,7 @@
sys.exit(1) sys.exit(1)
import EasyDialogs import EasyDialogs
import macostools
goals = [ goals = [
("mactcp.slb", "mactcpmodules.slb"), ("mactcp.slb", "mactcpmodules.slb"),
@ -37,6 +38,7 @@
("Dlg.slb", "toolboxmodules.slb"), ("Dlg.slb", "toolboxmodules.slb"),
("Evt.slb", "toolboxmodules.slb"), ("Evt.slb", "toolboxmodules.slb"),
("Menu.slb", "toolboxmodules.slb"), ("Menu.slb", "toolboxmodules.slb"),
("List.slb", "toolboxmodules.slb"),
("Qd.slb", "toolboxmodules.slb"), ("Qd.slb", "toolboxmodules.slb"),
("Res.slb", "toolboxmodules.slb"), ("Res.slb", "toolboxmodules.slb"),
("Snd.slb", "toolboxmodules.slb"), ("Snd.slb", "toolboxmodules.slb"),
@ -51,30 +53,10 @@
("imgtiff.slb", "imgmodules.slb") ("imgtiff.slb", "imgmodules.slb")
] ]
#
# Not guaranteed to be correct or stay correct (Apple doesn't tell you
# how to do this), but it seems to work.
#
def mkalias(src, dst):
"""Create a finder alias"""
srcfss = macfs.FSSpec(src)
dstfss = macfs.FSSpec(dst)
alias = srcfss.NewAlias()
srcfinfo = srcfss.GetFInfo()
Res.FSpCreateResFile(dstfss, srcfinfo.Creator, srcfinfo.Type, -1)
h = Res.FSpOpenResFile(dstfss, 3)
resource = Res.Resource(alias.data)
resource.AddResource('alis', 0, '')
Res.CloseResFile(h)
dstfinfo = dstfss.GetFInfo()
dstfinfo.Flags = dstfinfo.Flags|0x8000 # Alias flag
dstfss.SetFInfo(dstfinfo)
def main(): def main():
# Ask the user for the plugins directory # Ask the user for the plugins directory
dir, ok = macfs.GetDirectory() dir, ok = macfs.GetDirectory('Where is the PlugIns folder?')
if not ok: sys.exit(0) if not ok: sys.exit(0)
os.chdir(dir.as_pathname()) os.chdir(dir.as_pathname())
@ -97,7 +79,7 @@ def main():
sys.exit(0) sys.exit(0)
for dst, src in goals: for dst, src in goals:
if src in LibFiles: if src in LibFiles:
mkalias(src, dst) macostools.mkalias(src, dst)
else: else:
EasyDialogs.Message(dst+' not created: '+src+' not found') EasyDialogs.Message(dst+' not created: '+src+' not found')

1
Mac/scripts/MkPluginAliases.as
View file

@ -18,6 +18,7 @@ set G to (G & {{"Ctl.slb", "toolboxmodules.slb"}})
set G to (G & {{"Dlg.slb", "toolboxmodules.slb"}}) set G to (G & {{"Dlg.slb", "toolboxmodules.slb"}})
set G to (G & {{"Evt.slb", "toolboxmodules.slb"}}) set G to (G & {{"Evt.slb", "toolboxmodules.slb"}})
set G to (G & {{"Menu.slb", "toolboxmodules.slb"}}) set G to (G & {{"Menu.slb", "toolboxmodules.slb"}})
set G to (G & {{"List.slb", "toolboxmodules.slb"}})
set G to (G & {{"Qd.slb", "toolboxmodules.slb"}}) set G to (G & {{"Qd.slb", "toolboxmodules.slb"}})
set G to (G & {{"Res.slb", "toolboxmodules.slb"}}) set G to (G & {{"Res.slb", "toolboxmodules.slb"}})
set G to (G & {{"Snd.slb", "toolboxmodules.slb"}}) set G to (G & {{"Snd.slb", "toolboxmodules.slb"}})