view src/menu.h @ 97967:cc9bb337ef7c

Fix the expunge command so that the current message index is correct. * pmail.el (pmail-expunge-counter): New variable (pmail-set-attribute): Canonicalize the calling sequence to index, attribute, state. (pmail-show-message, pmail-delete-message, pmail-undelete-previous-message, pmail-delete-forward, pmail-mark-message): Use the new canonical calling sequence. (pmail-only-expunge): Use the expunge counter to update the current message index. (pmail-expunge-callback): Simplify. Just count the expunged messages with a lower index than the current message index. * pmaildesc.el (pmail-desc-get-previous): Fix an "off by one" issue. (pmail-desc-set-attribute): Canonicalize the calling sequence to index, attribute, state. * pmailout.el (pmail-output-body-to-file): Use the canonical calling sequence.

/* Functions to manipulate menus.
   Copyright (C) 2008 Free Software Foundation, Inc.

This file is part of GNU Emacs.

GNU Emacs is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation, either version 3 of the License, or
(at your option) any later version.

GNU Emacs is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.  */

#ifndef MENU_H
#define MENU_H

extern void init_menu_items P_ ((void));
extern void finish_menu_items P_ ((void));
extern void discard_menu_items P_ ((void));
extern void save_menu_items P_ ((void));
extern int parse_single_submenu P_ ((Lisp_Object, Lisp_Object, Lisp_Object));
extern void keymap_panes P_ ((Lisp_Object *, int, int));
extern void list_of_panes P_ ((Lisp_Object));
#if defined (USE_X_TOOLKIT) || defined (USE_GTK) || defined (HAVE_NTGUI)
extern void free_menubar_widget_value_tree P_ ((widget_value *));
extern void update_submenu_strings P_ ((widget_value *));
extern void find_and_call_menu_selection P_ ((FRAME_PTR, int,
					      Lisp_Object, void *));
#endif

#endif /* MENU_H */

/* arch-tag: c32b2778-724d-4e85-81d7-45f98530a988
   (do not change this comment) */