From: Jack Jansen Date: Fri, 8 Aug 1997 15:00:59 +0000 (+0000) Subject: mkalias() now has an optional third parameter to create relative X-Git-Tag: v1.5a3~114 X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=48f662de927de8523ef3618271fc289cf46d1f9b;p=python mkalias() now has an optional third parameter to create relative aliases (Just) --- diff --git a/Mac/Lib/macostools.py b/Mac/Lib/macostools.py index 46eef98a96..374d3f134d 100644 --- a/Mac/Lib/macostools.py +++ b/Mac/Lib/macostools.py @@ -26,11 +26,16 @@ BUFSIZ=0x80000 # Copy in 0.5Mb chunks # 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): +def mkalias(src, dst, relative=None): """Create a finder alias""" srcfss = macfs.FSSpec(src) dstfss = macfs.FSSpec(dst) - alias = srcfss.NewAlias() + if relative: + relativefss = macfs.FSSpec(relative) + # ik mag er geen None in stoppen :-( + alias = srcfss.NewAlias(relativefss) + else: + alias = srcfss.NewAlias() srcfinfo = srcfss.GetFInfo() Res.FSpCreateResFile(dstfss, srcfinfo.Creator, srcfinfo.Type, -1)