[Antiright-devel] antiright/lib help.c

[Jeffrey Bedard]

CVSROOT:        /cvsroot/antiright
Module name:    antiright
Branch:         
Changes by:     Jeffrey Bedard <address@hidden> 04/11/21 21:45:47

Modified files:
        lib            : help.c 

Log message:
        Added an about dialog.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/antiright/antiright/lib/help.c.diff?tr1=1.4&tr2=1.5&r1=text&r2=text

Patches:
Index: antiright/lib/help.c
diff -u antiright/lib/help.c:1.4 antiright/lib/help.c:1.5
--- antiright/lib/help.c:1.4    Fri Aug 13 18:18:18 2004
+++ antiright/lib/help.c        Sun Nov 21 21:45:47 2004
@@ -36,3 +36,88 @@
   widget=NULL;
   call_data=NULL;
 }
+
+void
+antiright_about_ok_cb(Widget caller, XtPointer call_data, XtPointer 
client_data)
+{
+  XtDestroyWidget(XtParent(XtParent(caller)));
+  call_data=NULL;
+  client_data=NULL;
+}
+
+void
+antiright_about_dialog()
+{
+  Widget form, dialog, package, copyright, ok, separator, bottom;
+  Widget license, license_button, description;
+  XmString title, package_string, description_string, copyright_string;
+  char *package_c_string;
+  
+  title=XmStringCreateLocalized("About");
+  ARCLARG;
+  antiright_set(XmNallowResize, True);
+  antiright_set(XmNdialogTitle, (XtArgVal)title);
+  dialog=XmCreateFormDialog(antiright.parent_widget, "About",
+                           antiright.arguments, antiright.arguments_int);
+  XmStringFree(title);
+
+  ARCLARG;
+  antiright_form_positions(0, ANTIRIGHT_NONE, 0, 100);
+  form=antiright_form(dialog);
+  ARCLARG;
+  antiright_form_positions(ANTIRIGHT_NONE, ANTIRIGHT_NONE, 0, 100);
+  antiright_form_widgets(form, NULL, NULL, NULL);
+  separator=antiright_separator(dialog);
+  ARCLARG;
+  antiright_form_positions(ANTIRIGHT_NONE, 100, 0, 100);
+  antiright_form_widgets(separator, NULL, NULL, NULL);
+  bottom=XmCreateForm(dialog, "bottom", 
+                     antiright.arguments, antiright.arguments_int);
+  XtManageChild(bottom);
+  ARCLARG;
+  antiright_form_positions(0, 100, 0, 100);
+  ok=antiright_button(bottom, "OK", antiright_about_ok_cb, NULL);
+  ARCLARG;
+  antiright_form_positions(0, ANTIRIGHT_NONE, 0, 100);
+
+  /* This removes the underscore in the package string.  */
+  asprintf(&package_c_string, "%s", PACKAGE_STRING);
+  if(package_c_string[9]=='_')
+    package_c_string[9]=' ';
+
+  package_string=XmStringCreateLocalized(package_c_string);
+  free(package_c_string);
+  antiright_set(XmNlabelString, (XtArgVal)package_string);
+  package=antiright_label(form, "package");
+  XmStringFree(package_string);
+  ARCLARG;
+  antiright_form_positions(ANTIRIGHT_NONE, ANTIRIGHT_NONE, 0, 100);
+  antiright_form_widgets(package, NULL, NULL, NULL);
+  description_string=
+    XmStringCreateLocalized("AntiRight is a lightweight desktop environment.");
+  antiright_set(XmNlabelString, (XtArgVal)description_string);
+  description=
+    antiright_label(form, "description");
+  XmStringFree(description_string);
+  ARCLARG;
+  antiright_form_positions(ANTIRIGHT_NONE, ANTIRIGHT_NONE, 0, 100);
+  antiright_form_widgets(description, NULL, NULL, NULL);
+  copyright_string=
+    XmStringCreateLocalized("Copyright 2002-2004, Jeffrey E. Bedard");
+  antiright_set(XmNlabelString, (XtArgVal)copyright_string);
+  copyright=antiright_label(form, "copyright");
+  XmStringFree(copyright_string);
+  ARCLARG;
+  antiright_form_positions(ANTIRIGHT_NONE, ANTIRIGHT_NONE, 0, ANTIRIGHT_NONE);
+  antiright_form_widgets(copyright, NULL, NULL, NULL);
+  license=antiright_label(form, "Licensed under the terms of the ");
+  ARCLARG;
+  antiright_form_positions(ANTIRIGHT_NONE, ANTIRIGHT_NONE, ANTIRIGHT_NONE, 
+                          ANTIRIGHT_NONE);
+  antiright_form_widgets(copyright, NULL, license, NULL);
+  license_button=antiright_button(form, "GNU General Public License", 
+                                 antiright_license_cb, "License");
+  ARCLARG;
+  /* Display the dialog.  */
+  XtManageChild(dialog);
+}