diff options
| author | Glenn Morris <rgm@gnu.org> | 2008-07-16 02:14:02 +0000 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2008-07-16 02:14:02 +0000 |
| commit | d384112704e2722e92287882f16efe6e89a0a08b (patch) | |
| tree | beb609b25af7e68d67107d41b129a79b6247d3b1 /admin/admin.el | |
| parent | 0ae1e5e5653aff34bb099296d34314a1c8279f91 (diff) | |
| download | emacs-d384112704e2722e92287882f16efe6e89a0a08b.tar.gz | |
(set-version, set-copyright): Add nextstep/ files.
Diffstat (limited to 'admin/admin.el')
| -rw-r--r-- | admin/admin.el | 43 |
1 files changed, 39 insertions, 4 deletions
diff --git a/admin/admin.el b/admin/admin.el index 2b4a7f40637..ca803fa4a99 100644 --- a/admin/admin.el +++ b/admin/admin.el @@ -159,7 +159,32 @@ Root must be the root of an Emacs source tree." (set-version-in-file root "mac/src/Emacs.r" release (rx (and (submatch (1+ (in "a-z"))) (0+ space) ?\, (0+ space) - "/* development, alpha, beta, or final (release) */")))))) + "/* development, alpha, beta, or final (release) */"))))) + ;; nextstep. + (set-version-in-file + root "nextstep/Cocoa/Emacs.base/Contents/Info.plist" + version (rx (and "CFBundleGetInfoString" (1+ anything) "Emacs" (1+ space) + (submatch (1+ (in "0-9.")))))) + (set-version-in-file + root "nextstep/Cocoa/Emacs.base/Contents/Info.plist" + version (rx (and "CFBundleShortVersionString" (1+ anything) + "Version" (1+ space) + (submatch (1+ (in "0-9.")))))) + (set-version-in-file + root "nextstep/Cocoa/Emacs.base/Contents/Resources/English.lproj/InfoPlist.strings" + version (rx (and "CFBundleShortVersionString" (0+ space) ?= (0+ space) + ?\" (0+ space) "Version" (1+ space) + (submatch (1+ (in "0-9.")))))) + (set-version-in-file + root "nextstep/Cocoa/Emacs.base/Contents/Resources/English.lproj/InfoPlist.strings" + version (rx (and "CFBundleGetInfoString" (0+ space) ?= (0+ space) + ?\" (0+ space) "Emacs version" (1+ space) + (submatch (1+ (in "0-9.")))))) + (set-version-in-file + root "nextstep/GNUstep/Emacs.base/Resources/Info-gnustep.plist" + version (rx (and "FullVersionID" (0+ space) ?= (0+ space) + ?\" (0+ space) "Emacs" (1+ space) + (submatch (1+ (in "0-9."))))))) ;; Note this makes some assumptions about form of short copyright. ;; FIXME add the \year in the refcards/*.tex files. @@ -208,9 +233,19 @@ Root must be the root of an Emacs source tree." (rx (and ?\" (submatch (1+ (not (in ?\")))) ?\" (0+ space) - "/* Long version number */"))))) + "/* Long version number */")))) + ;; nextstep. + (set-version-in-file + root "nextstep/Cocoa/Emacs.base/Contents/Info.plist" + copyright (rx (and "CFBundleGetInfoString" (1+ anything) "Emacs" (1+ space) + (1+ (in "0-9.")) (1+ space) + (submatch (1+ (not (in ?\<))))))) + (set-version-in-file + root "nextstep/Cocoa/Emacs.base/Contents/Resources/English.lproj/InfoPlist.strings" + copyright (rx (and "NSHumanReadableCopyright" (0+ space) ?\= (0+ space) + ?\" (submatch (1+ (not (in ?\")))))))) (provide 'admin) -;;; arch-tag: 4ea83636-2293-408b-884e-ad64f22a3bf5 -;; admin.el ends here. +;; arch-tag: 4ea83636-2293-408b-884e-ad64f22a3bf5 +;;; admin.el ends here |