Changeset 12831


Ignore:
Timestamp:
Sep 12, 2009, 11:49:34 PM (10 years ago)
Author:
gb
Message:

Install the Windows altconsole exe when building a standalone app bundle.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/cocoa-ide/ide-bundle.lisp

    r12820 r12831  
    7070;;; and figuring out how to get make to do so - is left as an exercise.
    7171(defun install-altconsole (bundle-path)
    72   #+cocotron (declare (ignore bundle-path))
    7372  #-cocotron
    7473  (let* ((altconsole-path (merge-pathnames ";Contents;Resources;AltConsole.app;" bundle-path))
     
    9089    (recursive-copy-directory build-bundle-path altconsole-path)
    9190    (ccl::touch altconsole-path)
    92     t))
     91    t)
     92  #+cocotron
     93  (let* ((path (probe-file "ccl:cocotron;WaltConsole;WaltConsole.exe")))
     94    (when path
     95      (copy-file path (merge-pathnames ";Contents;Resources;WaltConsole.exe" bundle-path))
     96      t))
     97  )
    9398
    9499(progn
Note: See TracChangeset for help on using the changeset viewer.