← Back to branch summary

~ubuntu-branches/ubuntu/intrepid/plplot/intrepid

« back to all changes in this revision

Viewing changes to bindings/octave/PLplot/figure.m

  • Committer: Bazaar Package Importer
  • Author(s): Rafael Laboissiere
  • Date: 2006-11-04 10:19:34 UTC
  • mfrom: (2.1.8 edgy)
  • Revision ID: james.westby@ubuntu.com-20061104101934-mlirvdg4gpwi6i5q
Tags: 5.6.1-10
* Orphaning the package
* debian/control: Changed the maintainer to the Debian QA Group

Show diffs side-by-side

added added

removed removed

Lines of Context:
bindings/octave/PLplot/figure.m
49
49
 
50
50
  if (!exist("__pl") || !struct_contains (__pl,"inited"))
51
51
    v = split(version ,'.');
52
 
    if (! (str2num(v(1,:)) >= 2 &&
53
 
           str2num(v(2,:)) >= 1 &&
54
 
           str2num(v(3,:)) >= 57))
 
52
    if (! ((str2num(v(1,:)) > 2) ||
 
53
           (str2num(v(1,:)) == 2 && str2num(v(2,:)) > 1) ||
 
54
           (str2num(v(1,:)) == 2 && str2num(v(2,:)) == 1 &&
 
55
            str2num(v(3,:)) >= 57)))
55
56
        error("The PLplot-Octave scripts need an Octave version \n\
56
 
        greater then or equal to 2.1.57.\n");
 
57
               greater than or equal to 2.1.57.\n");
57
58
    endif
58
59
 
59
60
    plplot_stub;
66
67
 
67
68
    if (automatic_replot == 0)
68
69
      warning("It is recommended that you set 'automatic_replot=1' \n\
69
 
          in your ~/.octaverc file.");
 
70
               in your ~/.octaverc file.");
70
71
      ##automatic_replot = 1;
71
72
    endif
72
73
  endif
183
184
      if (strcmp("tk", sprintf("%s",plgdev')))
184
185
        if (! exist("tk_start") && nargin == 6)
185
186
          error("Can't use this Tk feature of PLplot until tk_octave \
186
 
              is installed!\n")
 
187
                 is installed!\n")
187
188
        elseif (exist("tk_start"))
188
189
         if (!exist("__tk_name"))
189
190
          tk_init;
228
229
 
229
230
      ## init driver and make changes apply
230
231
      plinit;
231
 
      pladv(0);
232
 
      plflush;pleop;
 
232
      #next two commented. After last bop/eop CVS changes, first plot is empty.
 
233
      #pladv(0);
 
234
      #plflush;pleop;
233
235
      
234
236
      if ( exist("__tk_name") & (strcmp("tk", sprintf("%s",plgdev'))))
235
237
        eval(tk_receive(1));