/[antiright]/antiright/src/arshell/menubar.c
ViewVC logotype

Diff of /antiright/src/arshell/menubar.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1 by jefbed, Mon Aug 9 22:45:02 2004 UTC revision 1.2 by jefbed, Fri Aug 13 19:32:51 2004 UTC
# Line 106  arshell_handle_menubar_sub_arguments(int Line 106  arshell_handle_menubar_sub_arguments(int
106        break;        break;
107      }      }
108  }  }
109    
110    void
111    arshell_setup_work_menubar()
112    {
113      ARCLARG;
114      if(arshell.gui.menubar.file_widget != NULL)
115        {
116          antiright_button(arshell.gui.menubar.file_widget, "Save",
117                           arshell_save_work_area, NULL);
118          antiright_button(arshell.gui.menubar.file_widget, "Save As",
119                           arshell_save_as_cb, NULL);
120          antiright_button(arshell.gui.menubar.file_widget, "Open",
121                           arshell_open_cb, NULL);
122          antiright_button(arshell.gui.menubar.file_widget, "Insert",
123                           arshell_insert_file_cb, NULL);
124          antiright_button(arshell.gui.menubar.file_widget, "Print",
125                           arshell_print_cb, NULL);
126          arshell.gui.menubar.edit_widget=
127            antiright_edit_menu(arshell.gui.menubar.menubar_widget,
128                                arshell.gui.widgets.work);
129          antiright_separator(arshell.gui.menubar.edit_widget);
130          antiright_button(arshell.gui.menubar.edit_widget, "Search",
131                           arshell_search_cb, NULL);
132          antiright_button(arshell.gui.menubar.edit_widget, "Replace",
133                           arshell_replace_cb, NULL);
134          antiright_button(arshell.gui.menubar.edit_widget, "Find at Cursor",
135                           arshell_find_at_cursor_cb, NULL);
136          antiright_separator(arshell.gui.menubar.view_widget);
137          {
138            Widget button;
139            arshell_initialize_row_manager();
140            ARCLARG;
141            antiright_set(XmNmarginWidth, 0);
142            antiright_set(XmNmarginHeight, 0);
143            antiright_set(XmNpacking, XmPACK_TIGHT);
144            antiright_set(XmNorientation, XmHORIZONTAL);
145            antiright_set(XmNspacing, 0);
146            arshell.edit.toolbar=
147              antiright_row(arshell.gui.layout.row_manager_widget);
148            {
149              char *title;
150              ARCLARG;
151              antiright_set(XmNtitle, (XtArgVal)&title);
152              antiright_get_values(antiright.parent_widget);
153              puts(title);
154              if((title[0]=='S') & (title[1]=='t') & (title[2]=='i'))
155                {
156                  XtUnmanageChild(arshell.edit.toolbar);
157                }
158              ARCLARG;
159            }
160            
161            ARCLARG;
162            button=antiright_button(arshell.edit.toolbar, "Open", arshell_open_cb,
163                                    NULL);
164            antiright_set_tooltip(button, "Open a file.  ");
165            button=antiright_button(arshell.edit.toolbar, "Save",
166                                    arshell_save_work_area, NULL);
167            antiright_set_tooltip(button, "Save the current file.  ");
168            button=antiright_button(arshell.edit.toolbar, "Print",
169                                    arshell_print_cb, NULL);
170            antiright_set_tooltip(button, "Print the current file.  ");
171            button=antiright_button(arshell.edit.toolbar, "Cut", antiright_cut_cb,
172                                    arshell.gui.widgets.work);
173            antiright_set_tooltip(button, "Cut a selection into the clipboard.");
174            button=antiright_button(arshell.edit.toolbar, "Copy",
175                                    antiright_copy_cb,
176                                    arshell.gui.widgets.work);
177            antiright_set_tooltip(button, "Copy a selection into the clipboard");
178            button=antiright_button(arshell.edit.toolbar, "Paste",
179                                    antiright_paste_cb,
180                                    arshell.gui.widgets.work);
181            antiright_set_tooltip(button, "Paste the contents of the clipboard.");
182            button=antiright_button(arshell.edit.toolbar, "Search",
183                                    arshell_search_cb, NULL);
184            antiright_set_tooltip(button, "Search for text.");
185            button=antiright_button(arshell.edit.toolbar, "Replace",
186                                    arshell_replace_cb, NULL);
187            antiright_set_tooltip(button, "Find and replace text.");
188          }
189        }
190    }

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26