Ticket #1608: 0001-Check-for-installed-files-iff-installing-them.patch

File 0001-Check-for-installed-files-iff-installing-them.patch, 1.4 KB (added by wasamasa, 12 months ago)
  • chicken-install.scm

    From 00132d0376eb4744231aec204202898fad5f3c20 Mon Sep 17 00:00:00 2001
    From: Vasilij Schneidermann <mail@vasilij.de>
    Date: Sat, 13 Apr 2019 18:15:15 +0200
    Subject: [PATCH] Check for installed files iff installing them
    
    ---
     chicken-install.scm | 2 +-
     1 file changed, 1 insertion(+), 1 deletion(-)
    
    diff --git a/chicken-install.scm b/chicken-install.scm
    index f35e4d28..0978c4be 100644
    a b  
    824824                                                               ver
    825825                                                               platform
    826826                                                               'host)))
    827             (check-installed-files name info)                         
    828827            (let ((bscript (make-pathname dir name
    829828                                          (build-script-extension 'host platform)))
    830829                  (iscript (make-pathname dir name
     
    843842                      (print "building " name)
    844843                      (run-script dir bscript platform)
    845844                      (unless (if (member name requested-eggs) no-install no-install-dependencies)
     845                        (check-installed-files name info)
    846846                        (print "  installing " name)
    847847                        (run-script dir iscript platform sudo: sudo-install))
    848848                      (when (and (member name requested-eggs)