Seiji Zenitani
zenit****@users*****
2006年 5月 10日 (水) 19:09:29 JST
Index: CarbonEmacsPackage/GPL/patch/elisp-changes.patch
diff -u /dev/null CarbonEmacsPackage/GPL/patch/elisp-changes.patch:1.1
--- /dev/null Wed May 10 19:09:29 2006
+++ CarbonEmacsPackage/GPL/patch/elisp-changes.patch Wed May 10 19:09:29 2006
@@ -0,0 +1,52 @@
+--- lisp/files.el.orig 2006-05-02 21:24:55.000000000 +0900
++++ lisp/files.el 2006-05-10 14:32:20.000000000 +0900
+@@ -1840,7 +1840,7 @@
+ ("\\.pas\\'" . pascal-mode)
+ ("\\.ad[abs]\\'" . ada-mode)
+ ("\\.ad[bs].dg\\'" . ada-mode)
+- ("\\.\\([pP]\\([Llm]\\|erl\\|od\\)\\|al\\)\\'" . perl-mode)
++ ("\\.\\([pP]\\([Llm]\\|erl\\|od\\)\\|al\\)\\'" . cperl-mode)
+ ("Imakefile\\'" . makefile-imake-mode)
+ ,@(if (memq system-type '(berkeley-unix next-mach darwin))
+ '(("\\.mk\\'" . makefile-bsdmake-mode)
+@@ -1992,9 +1992,9 @@
+ (mapc
+ (lambda (l)
+ (cons (purecopy (car l)) (cdr l)))
+- '(("perl" . perl-mode)
+- ("perl5" . perl-mode)
+- ("miniperl" . perl-mode)
++ '(("perl" . cperl-mode)
++ ("perl5" . cperl-mode)
++ ("miniperl" . cperl-mode)
+ ("wish" . tcl-mode)
+ ("wishx" . tcl-mode)
+ ("tcl" . tcl-mode)
+--- lisp/menu-bar.el.orig 2006-03-20 17:06:51.000000000 +0900
++++ lisp/menu-bar.el 2006-03-20 17:07:45.000000000 +0900
+@@ -545,15 +545,16 @@
+ (cons "Cut" (cons "Delete text in region and copy it to the clipboard"
+ 'clipboard-kill-region)))
+
+- ;; These are Sun server keysyms for the Cut, Copy and Paste keys
+- ;; (also for XFree86 on Sun keyboard):
+- (define-key global-map [f20] 'clipboard-kill-region)
+- (define-key global-map [f16] 'clipboard-kill-ring-save)
+- (define-key global-map [f18] 'clipboard-yank)
+- ;; X11R6 versions:
+- (define-key global-map [cut] 'clipboard-kill-region)
+- (define-key global-map [copy] 'clipboard-kill-ring-save)
+- (define-key global-map [paste] 'clipboard-yank))
++;; ;; These are Sun server keysyms for the Cut, Copy and Paste keys
++;; ;; (also for XFree86 on Sun keyboard):
++;; (define-key global-map [f20] 'clipboard-kill-region)
++;; (define-key global-map [f16] 'clipboard-kill-ring-save)
++;; (define-key global-map [f18] 'clipboard-yank)
++;; ;; X11R6 versions:
++;; (define-key global-map [cut] 'clipboard-kill-region)
++;; (define-key global-map [copy] 'clipboard-kill-ring-save)
++;; (define-key global-map [paste] 'clipboard-yank)
++ )
+
+ ;; The "Options" menu items
+
Index: CarbonEmacsPackage/GPL/patch/fix-menu-bar.patch
diff -u CarbonEmacsPackage/GPL/patch/fix-menu-bar.patch:1.1 CarbonEmacsPackage/GPL/patch/fix-menu-bar.patch:removed
--- CarbonEmacsPackage/GPL/patch/fix-menu-bar.patch:1.1 Tue Mar 21 01:18:02 2006
+++ CarbonEmacsPackage/GPL/patch/fix-menu-bar.patch Wed May 10 19:09:29 2006
@@ -1,28 +0,0 @@
---- lisp/menu-bar.el.orig 2006-03-20 17:06:51.000000000 +0900
-+++ lisp/menu-bar.el 2006-03-20 17:07:45.000000000 +0900
-@@ -545,15 +545,16 @@
- (cons "Cut" (cons "Delete text in region and copy it to the clipboard"
- 'clipboard-kill-region)))
-
-- ;; These are Sun server keysyms for the Cut, Copy and Paste keys
-- ;; (also for XFree86 on Sun keyboard):
-- (define-key global-map [f20] 'clipboard-kill-region)
-- (define-key global-map [f16] 'clipboard-kill-ring-save)
-- (define-key global-map [f18] 'clipboard-yank)
-- ;; X11R6 versions:
-- (define-key global-map [cut] 'clipboard-kill-region)
-- (define-key global-map [copy] 'clipboard-kill-ring-save)
-- (define-key global-map [paste] 'clipboard-yank))
-+;; ;; These are Sun server keysyms for the Cut, Copy and Paste keys
-+;; ;; (also for XFree86 on Sun keyboard):
-+;; (define-key global-map [f20] 'clipboard-kill-region)
-+;; (define-key global-map [f16] 'clipboard-kill-ring-save)
-+;; (define-key global-map [f18] 'clipboard-yank)
-+;; ;; X11R6 versions:
-+;; (define-key global-map [cut] 'clipboard-kill-region)
-+;; (define-key global-map [copy] 'clipboard-kill-ring-save)
-+;; (define-key global-map [paste] 'clipboard-yank)
-+ )
-
- ;; The "Options" menu items
-