Mercurial > emacs
comparison lisp/printing.el @ 90711:25387147db14
Replace easy-menu-change by easy-menu-add-item.
author | Vinicius Jose Latorre <viniciusjl@ig.com.br> |
---|---|
date | Mon, 04 Dec 2006 15:03:21 +0000 |
parents | 0b79f231aae3 |
children | 95d0cdf160ea |
comparison
equal
deleted
inserted
replaced
90710:0b79f231aae3 | 90711:25387147db14 |
---|---|
3110 (setq pr-menu-print-item nil | 3110 (setq pr-menu-print-item nil |
3111 pr-menu-bar (vector 'menu-bar | 3111 pr-menu-bar (vector 'menu-bar |
3112 (pr-get-symbol (nth 1 menu-file)) | 3112 (pr-get-symbol (nth 1 menu-file)) |
3113 (pr-get-symbol "Print")))) | 3113 (pr-get-symbol "Print")))) |
3114 (t | 3114 (t |
3115 (easy-menu-change (cdr menu-file) "Print" pr-menu-spec)))))))) | 3115 (easy-menu-add-item global-map menu-file |
3116 (easy-menu-create-menu "Print" pr-menu-spec))) | |
3117 )))))) | |
3116 (pr-update-menus t)) | 3118 (pr-update-menus t)) |
3117 | 3119 |
3118 | 3120 |
3119 ;; Key binding | 3121 ;; Key binding |
3120 (let ((pr-print-key (if (featurep 'xemacs) | 3122 (let ((pr-print-key (if (featurep 'xemacs) |