aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2010-10-02 19:17:47 -0700
committerGlenn Morris2010-10-02 19:17:47 -0700
commit6abfe35f16d4f99bd3f3240e0a2988758f7f5c68 (patch)
tree8f56ccc5cc79f609f102fd37e921c8f29244dd27
parent0f810fbf3e409ad01353c8a62e727da4f5e42455 (diff)
downloademacs-6abfe35f16d4f99bd3f3240e0a2988758f7f5c68.tar.gz
emacs-6abfe35f16d4f99bd3f3240e0a2988758f7f5c68.zip
* lisp/printing.el: Drop Emacs 20 code.
-rw-r--r--lisp/ChangeLog2
-rw-r--r--lisp/printing.el21
2 files changed, 5 insertions, 18 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b252e5b47d7..901516cfeae 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
12010-10-03 Glenn Morris <rgm@gnu.org> 12010-10-03 Glenn Morris <rgm@gnu.org>
2 2
3 * printing.el: Drop Emacs 20 code.
4
3 * calendar/appt.el (appt-delete): Don't autoload it (you can't use it 5 * calendar/appt.el (appt-delete): Don't autoload it (you can't use it
4 without having used appt.el already). 6 without having used appt.el already).
5 7
diff --git a/lisp/printing.el b/lisp/printing.el
index 2cbf39f1967..aacd8d42ae4 100644
--- a/lisp/printing.el
+++ b/lisp/printing.el
@@ -1,7 +1,7 @@
1;;; printing.el --- printing utilities 1;;; printing.el --- printing utilities
2 2
3;; Copyright (C) 2000, 2001, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 3;; Copyright (C) 2000, 2001, 2003, 2004, 2005, 2006, 2007, 2008, 2009,
4;; Free Software Foundation, Inc. 4;; 2010 Free Software Foundation, Inc.
5 5
6;; Author: Vinicius Jose Latorre <viniciusjl@ig.com.br> 6;; Author: Vinicius Jose Latorre <viniciusjl@ig.com.br>
7;; Maintainer: Vinicius Jose Latorre <viniciusjl@ig.com.br> 7;; Maintainer: Vinicius Jose Latorre <viniciusjl@ig.com.br>
@@ -1387,20 +1387,6 @@ Used by `pr-menu-bind' and `pr-update-menus'.")
1387 (require 'easymenu)) ; to avoid compilation gripes 1387 (require 'easymenu)) ; to avoid compilation gripes
1388 1388
1389 (eval-and-compile 1389 (eval-and-compile
1390 (cond
1391 ;; GNU Emacs 20
1392 ((< emacs-major-version 21)
1393 (defun pr-global-menubar (pr-menu-spec)
1394 (require 'easymenu)
1395 (easy-menu-change '("tools") "Printing" pr-menu-spec pr-menu-print-item)
1396 (when pr-menu-print-item
1397 (easy-menu-remove-item nil '("tools") pr-menu-print-item)
1398 (setq pr-menu-print-item nil
1399 pr-menu-bar (vector 'menu-bar 'tools
1400 (pr-get-symbol "Printing")))))
1401 )
1402 ;; GNU Emacs 21 & 22
1403 (t
1404 (defun pr-global-menubar (pr-menu-spec) 1390 (defun pr-global-menubar (pr-menu-spec)
1405 (require 'easymenu) 1391 (require 'easymenu)
1406 (let ((menu-file (if (= emacs-major-version 21) 1392 (let ((menu-file (if (= emacs-major-version 21)
@@ -1422,8 +1408,7 @@ Used by `pr-menu-bind' and `pr-update-menus'.")
1422 (t 1408 (t
1423 (easy-menu-add-item global-map menu-file 1409 (easy-menu-add-item global-map menu-file
1424 (easy-menu-create-menu "Print" pr-menu-spec))) 1410 (easy-menu-create-menu "Print" pr-menu-spec)))
1425 ))) 1411 ))))
1426 )))
1427 1412
1428 (eval-and-compile 1413 (eval-and-compile
1429 (cond 1414 (cond