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 Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel