Handle varalias chains, custom variables in #'user-variable-p. src/ChangeLog addition: 2008-08-23 Aidan Kehoe <kehoea@parhasard.net> * eval.c (Fuser_variable_p): Moved to symbols.c * symbols.c (Fcustom_variable_p): Moved here from custom.el. (user_variable_alias_check_fun): Mapper function used in `user-variable-p'. (Fuser_variable_p): Moved here from eval.c, to allow it to examine the variable alias chain. Expanded to check each entry in the variable alias chain for signs of being a user variable; documentation updated, noting the differences between GNU's behaviour and ours (ours is a little more sensible) (map_varalias_chain): New. Given a C function, call it at least once for each symbol in a symbol's varalias chain, signalling an error if there's a cycle, and returning immediately if the function returns something other than Qzero. (Fdefvaralias): Correct the use of the word "alias" in the docstring and in the argument name. Motivate this in a comment. Add support for a DOCSTRING argument, something GNU has too, and document this * gc.c (vars_of_gc): Start the docstring of `garbage-collection-messages' with an asterisk, to indicate that it's a user variable. lisp/ChangeLog addition: 2008-08-23 Aidan Kehoe <kehoea@parhasard.net> * custom.el: Move #'custom-variable-p to C, since it's now called from #'user-variable-p.

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))