2006-01-22 Han-Wen Nienhuys <hanwen@xs4all.nl>
+ * stepmake/bin/install.py (dest): Only chmod/chown just created directories
+
* Documentation/user/notation-appendices.itely (The Feta font):
use it.
0
(1+ (min-length (cdr lst) (1- n)) )))
-#(define (doc-chars names)
+#(define (doc-chars names acc)
(let*
((n (min-length names 2))
(head (take names n))
(tail (drop names n))
)
- (cons
- (make-line-markup (map doc-char head))
- (if (null? tail)
- '()
- (doc-chars tail)))))
+ (if (null? head)
+ acc
+ (doc-chars tail
+ (cons (make-line-markup (map doc-char head)) acc)))
+ ))
#(define (group-lines lines)
(let*
#(let*
((lines (doc-chars
- (ly:font-glyph-list (format "~a/share/lilypond/~a/fonts/otf/emmentaler-20.otf"
+ (ly:font-glyph-list (format "~a/fonts/otf/emmentaler-20.otf"
(getenv "LILYPONDPREFIX")
- (lilypond-version)
- ))))
- (pages (group-lines lines)))
+ ))
+ '()))
+ (pages (group-lines (reverse lines))))
(for-each
(lambda (x)
dest = args.pop()
for f in args:
- if create_dir and not os.path.isdir (f):
+ if create_dir:
+ if os.path.isdir (f):
+ continue
+
os.makedirs (f, mode=mode)
chown_me.append (f)
else:
shutil.copy2 (f, dest)
else:
shutil.move (f, dest)
+
if os.path.isdir (dest):
chown_me.append (os.path.join (dest, os.path.basename (f)))
else: