Mercurial > emacs
view oldXMenu/SetPane.c @ 109838:64936c70841e
Try and remove some of SMIE's black magic by generalizing some rules.
* lisp/emacs-lisp/smie.el (smie-default-backward-token)
(smie-default-forward-token): Strip properties.
(smie-next-sexp): Be more careful with associative operators.
(smie-forward-sexp-command): Generalize.
(smie-backward-sexp-command): Simplify.
(smie-closer-alist): New var.
(smie-close-block): New command.
(smie-indent-debug-log): New var.
(smie-indent-offset-rule): Add a few more cases.
(smie-indent-column): New function.
(smie-indent-after-keyword): Use it.
(smie-indent-keyword): Use it.
Fix up the opener code's point position.
(smie-indent-comment): Only applies at BOL.
(smie-indent-debug): New command.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Wed, 18 Aug 2010 12:57:48 +0200 |
parents | 5cc91198ffb2 |
children | ef719132ddfa |
line wrap: on
line source
/* Copyright Massachusetts Institute of Technology 1985 */ #include "copyright.h" /* * XMenu: MIT Project Athena, X Window system menu package * * XMenuSetPane - Set a menu pane to be active or inactive. * * Author: Tony Della Fera, DEC * August, 1985 * */ #include "XMenuInt.h" int XMenuSetPane(register XMenu *menu, register int p_num, register int active) /* Menu object to be modified. */ /* Pane number to be modified. */ /* Make selection active? */ { register XMPane *p_ptr; /* XMPane pointer. */ /* * Find the right pane. */ p_ptr = _XMGetPanePtr(menu, p_num); if (p_ptr == NULL) return(XM_FAILURE); /* * Set its active switch. */ p_ptr->active = active; if (p_ptr->active == False) p_ptr->activated = False; /* * Return the pane number just set. */ _XMErrorCode = XME_NO_ERROR; return(p_num); } /* arch-tag: 90bc8d90-031d-41a2-a2c6-04bf94efbc90 (do not change this comment) */