Changeset 9284


Ignore:
Timestamp:
Apr 25, 2008, 10:20:34 PM (11 years ago)
Author:
mikel
Message:

began factoring write-info-plist so it doesn't hardcode getting the plist from the IDE

File:
1 edited

Legend:

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

    r9283 r9284  
    9595;;;       behavior from more general behavior that can be used
    9696;;;       by the batch builder, which does not depend on the IDE.
    97 (defun write-info-plist (path name package-type bundle-signature
     97(defun write-info-plist (out-path name package-type bundle-signature
    9898                         &key main-nib-name)
    9999  ;; read the Info.plist of the IDE app, change
     
    120120           (app-name-key (%make-nsstring "CFBundleExecutable"))
    121121           (app-name-str (%make-nsstring name))
    122            (app-plist-path-str (%make-nsstring (namestring path))))
     122           (app-plist-path-str (%make-nsstring (namestring out-path))))
    123123      (#/setValue:forKey: info-dict bundle-name-str bundle-name-key)
    124124      (#/setValue:forKey: info-dict app-name-str app-name-key)
     
    130130                            #@"NSMainNibFile"))
    131131      (#/writeToFile:atomically: info-dict app-plist-path-str #$YES))))
     132
     133(defun read-info-plist (info-path)
     134  (let* ((info-path-str (namestring info-path)))
     135    (#/dictionaryWithContentsOfFile: ns:ns-mutable-dictionary
     136                                     info-path-str)))
    132137
    133138;;; MAKE-APPLICATION-BUNDLE name package-type bundle-signature project-path
Note: See TracChangeset for help on using the changeset viewer.