← Back to branch summary

~ubuntu-branches/ubuntu/utopic/rggobi/utopic

« back to all changes in this revision

Viewing changes to src/ui.c

  • Committer: Bazaar Package Importer
  • Author(s): Dirk Eddelbuettel
  • Date: 2006-11-09 20:28:24 UTC
  • mfrom: (1.1.4 upstream)
  • Revision ID: james.westby@ubuntu.com-20061109202824-rprmht1pviku76qg
Tags: 2.1.4-1-1
* New upstream release
* debian/rules: Simplied to one-liner sourcing r-cran.mk
* debian/control: (Build-)Depends: upgraded to the current versions
  r-base-core (>= 2.4.0) and ggobi (>= 2.1.4)
* debian/control: Added Depends: on r-cran-rgtk2; we cannot currently
  Build-Depends: on it as it wants an X11 display which stop autobuilds
* debian/control: Standards-Version: upgraded to 3.7.2

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/ui.c
3
3
/**
4
4
  This returns a raw pointer to the Gtk window object
5
5
  associated with the given display, which is given
6
 
  as an S object of class ggobiDisplay.
 
6
  as an S object of class GGobiDisplay.
7
7
 */
8
8
USER_OBJECT_
9
9
RS_GGOBI(getDisplayWindow)(USER_OBJECT_ display)
20
20
 
21
21
/**
22
22
  Extracts a list of the splotd objects from the given displayd
23
 
  given as an S object of class ggobiDisplay.
 
23
  given as an S object of class GGobiDisplay.
24
24
  This returns the splotd objects as simple external pointers and 
25
25
  does not put a class on them.
26
26
 */
57
57
 
58
58
USER_OBJECT_
59
59
RS_GGOBI(getMainMenubar)(USER_OBJECT_ gobi) {
60
 
  ggobid *gg = GGOBI_GGOBI(toGGobi(gobi));
 
60
  ggobid *gg = toGGobi(gobi);
61
61
  USER_OBJECT_ ans = NULL_USER_OBJECT;
 
62
  g_return_val_if_fail(GGOBI_IS_GGOBI(gg), NULL_USER_OBJECT);
62
63
  if(gg)
63
64
    ans = toRPointer(gg->main_menubar, "GtkWidget");
64
65
  return(ans);
66
67
 
67
68
USER_OBJECT_
68
69
RS_GGOBI(getDisplayMenubar)(USER_OBJECT_ display, USER_OBJECT_ gobiId) {
69
 
  displayd *dpy =  GetDisplay(display, gobiId, NULL);
 
70
  displayd *dpy =  toDisplay(display);
70
71
  USER_OBJECT_ ans = NULL_USER_OBJECT;
71
 
  if(dpy)
72
 
    ans = toRPointer(dpy->menubar, "GtkWidget");
 
72
  g_return_val_if_fail(GGOBI_IS_DISPLAY(dpy), NULL_USER_OBJECT);
 
73
  ans = toRPointer(dpy->menubar, "GtkWidget");
73
74
  return(ans);
74
75
}
75
76
 
76
77
USER_OBJECT_
77
78
RS_GGOBI(getMainWindow)(USER_OBJECT_ gobiId)
78
79
{
79
 
  ggobid *gg = GGOBI_GGOBI(toGGobi(gobiId));
 
80
  ggobid *gg = toGGobi(gobiId);
80
81
  USER_OBJECT_ ans;
 
82
  g_return_val_if_fail(GGOBI_IS_GGOBI(gg), NULL_USER_OBJECT);
81
83
 
82
84
  ans = toRPointer(gg->main_window, "GtkWindow");
83
85