view nt/installer/Wise/files.py @ 2527:491f8cf78a9c

[xemacs-hg @ 2005-01-28 02:58:38 by ben] Abstract font-list/color-list font-menu.el, font.el, frame.el, gtk-font-menu.el, minibuf.el, msw-faces.el, msw-font-menu.el, obsolete.el, x-faces.el, x-font-menu.el: list-fonts->font-list. Create color-list. Abstract out x/msw-specific versions and obsolete the x/msw-specific Lisp functions. console-impl.h, objects-gtk.c, objects-msw.c, objects-tty.c, objects-x.c, objects.c: list-fonts->font-list. Create color-list. Abstract out x/msw-specific versions and obsolete the x/msw-specific Lisp functions.
author ben
date Fri, 28 Jan 2005 02:58:52 +0000
parents 74fd4e045ea6
children
line wrap: on
line source

import os
import dirs

def listdir_recursive(basedir):
    ret = []
    for f in os.listdir(basedir):
	if os.path.isfile(basedir+"\\"+f):
	    ret.append(f)
	elif os.path.isdir(basedir+"\\"+f):
	    for f1 in listdir_recursive(basedir+"\\"+f):
		ret.append(f+"\\"+f1)
    return ret

install = []

for f in os.listdir(dirs.source+"\\lib-src"):
    if f == "DOC" or f[-4:]==".exe":
	install.append((f,dirs.source+"\\lib-src",dirs.bin_dst))


for f in ['runemacs.exe', 'xemacs.exe']:
    install.append((f,dirs.source+"\\src",dirs.bin_dst))

for f in listdir_recursive(dirs.source+"\\lisp"):
    install.append((f,dirs.source+"\\lisp",dirs.lisp_dst))

for f in listdir_recursive(dirs.source+"\\etc"):
    install.append((f,dirs.source+"\\etc",dirs.etc_dst))


for f in os.listdir(dirs.source+"\\info"):
    install.append((f,dirs.source+"\\info",dirs.info_dst))