Ignore:
Timestamp:
Aug 11, 2014, 6:20:38 PM (7 years ago)
Author:
rme
Message:

Modifications for Mac App Store pacakging.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/1.9-appstore/source/cocoa-ide/app-delegate.lisp

    r15491 r16155  
    3434    (#/registerDefaults: domain dict)
    3535    (#/release dict)
    36     (update-cocoa-defaults)
    37     (when *standalone-cocoa-ide*
    38       (init-ccl-directory-for-ide))))
    39 
    40 (defun init-ccl-directory-for-ide ()
    41   (let* ((bundle-path (#/bundlePath (#/mainBundle ns:ns-bundle)))
    42          (parent (#/stringByDeletingLastPathComponent bundle-path))
    43          (path (ccl::ensure-directory-pathname
    44                 (lisp-string-from-nsstring parent))))
    45     (ccl::replace-base-translation "ccl:" path)))
     36    (update-cocoa-defaults)))
    4637
    4738
Note: See TracChangeset for help on using the changeset viewer.