[Emacs-diffs] Changes to emacs/oldXMenu/ChgPane.c [lexbind]

[Miles Bader]

Index: emacs/oldXMenu/ChgPane.c
diff -c /dev/null emacs/oldXMenu/ChgPane.c:1.1.18.1
*** /dev/null   Tue Oct 14 18:56:39 2003
--- emacs/oldXMenu/ChgPane.c    Tue Oct 14 18:56:27 2003
***************
*** 0 ****
--- 1,69 ----
+ #include "copyright.h"
+ 
+ /* $Header: /cvsroot/emacs/emacs/oldXMenu/ChgPane.c,v 1.1.18.1 2003/10/14 
22:56:27 miles Exp $ */
+ /* Copyright    Massachusetts Institute of Technology    1985 */
+ 
+ /*
+  * XMenu:     MIT Project Athena, X Window system menu package
+  *
+  *    XMenuChangePane - Change the label of a  menu pane.
+  *
+  *    Author:         Tony Della Fera, DEC
+  *                    December 19, 1985
+  *
+  */
+ 
+ #include "XMenuInt.h"
+ 
+ int
+ XMenuChangePane(menu, p_num, label)
+     register XMenu *menu;     /* Menu object to be modified. */
+     register int p_num;               /* Pane number to be modified. */
+     char *label;              /* Selection label. */
+ {
+     register XMPane *p_ptr;   /* XMPane pointer. */
+ 
+     int label_length;         /* Label length in characters. */
+     int label_width;          /* Label width in pixels. */
+ 
+     /*
+      * Check for NULL pointers!
+      */
+     if (label == NULL) {
+       _XMErrorCode = XME_ARG_BOUNDS;
+       return(XM_FAILURE);
+     }
+ 
+     /*
+      * Find the right pane.
+      */
+     p_ptr = _XMGetPanePtr(menu, p_num);
+     if (p_ptr == NULL) return(XM_FAILURE);
+ 
+     /*
+      * Determine label size.
+      */
+     label_length = strlen(label);
+     label_width = XTextWidth(menu->p_fnt_info, label, label_length);
+ 
+     /*
+      * Change the pane data.
+      */
+     p_ptr->label = label;
+     p_ptr->label_width = label_width;
+     p_ptr->label_length = label_length;
+ 
+     /*
+      * Schedule a recompute.
+      */
+     menu->recompute = 1;
+ 
+     /*
+      * Return the pane number just changed.
+      */
+     _XMErrorCode = XME_NO_ERROR;
+     return(p_num);
+ }
+ 
+ /* arch-tag: e267e9de-a3f0-4a0d-8c45-413afa176fd8
+    (do not change this comment) */