In the Aquamacs distribution, I use it as follows:
(defun mac-set-creator-code-for-file ()
(if (and aquamacs-set-creator-codes-after-writing-files
buffer-file-name
(fboundp 'mac-set-creator)
)
(mac-set-creator buffer-file-name)
)
)
(add-hook 'after-save-hook 'mac-set-creator-code-for-file)
This contains some free code from Apple.
mac-set-creator.patch
Description: Binary data
_______________________________________________ Emacs-devel mailing list [email protected] http://lists.gnu.org/mailman/listinfo/emacs-devel
