~ubuntu-branches/ubuntu/quantal/ruby1.9.1/quantal

« back to all changes in this revision

Viewing changes to ext/tk/sample/demos-en/aniwave.rb

  • Committer: Bazaar Package Importer
  • Author(s): Lucas Nussbaum
  • Date: 2010-07-31 17:08:39 UTC
  • mfrom: (1.1.4 upstream) (8.1.2 sid)
  • Revision ID: james.westby@ubuntu.com-20100731170839-j034dmpdqt1cc4p6
Tags: 1.9.2~svn28788-1
* New release based on upstream snapshot from the 1.9.2 branch,
  after 1.9.2 RC2. That branch is (supposed to be) binary-compatible
  with the 1.9.1 branch.
  + Builds fine on i386. Closes: #580852.
* Upgrade to Standards-Version: 3.9.1. No changes needed.
* Updated generated incs.
* Patches that still need work:
  + Unclear status, need more investigation:
   090729_fix_Makefile_deps.dpatch
   090803_exclude_rdoc.dpatch
   203_adjust_base_of_search_path.dpatch
   902_define_YAML_in_yaml_stringio.rb.dpatch
   919_common.mk_tweaks.dpatch
   931_libruby_suffix.dpatch
   940_test_thread_mutex_sync_shorter.dpatch
  + Maybe not needed anymore, keeping but not applying.
   102_skip_test_copy_stream.dpatch (test doesn't block anymore?)
   104_skip_btest_io.dpatch (test doesn't block anymore?)
   201_gem_prelude.dpatch (we don't use that rubygems anyway?)
   202_gem_default_dir.dpatch (we don't use that rubygems anyway?)
   940_test_file_exhaustive_fails_as_root.dpatch
   940_test_priority_fails.dpatch
   100518_load_libc_libm.dpatch
* Add disable-tests.diff: disable some tests that cause failures on FreeBSD.
  Closes: #590002, #543805, #542927.
* However, many new failures on FreeBSD. Since that version is still an
  improvement, add the check that makes test suite failures non-fatal on
  FreeBSD again. That still needs to be investigated.
* Re-add 903_skip_base_ruby_check.dpatch
* Add build-dependency on ruby1.8 and drop all pre-generated files.

Show diffs side-by-side

added added

removed removed

Lines of Context:
5
5
 
6
6
# destroy toplevel widget for this demo script
7
7
if defined?($aniwave_demo) && $aniwave_demo
8
 
  $aniwave_demo.destroy 
 
8
  $aniwave_demo.destroy
9
9
  $aniwave_demo = nil
10
10
end
11
11
 
51
51
    @direction = dir
52
52
 
53
53
    # create canvas widget
54
 
    @c = TkCanvas.new(frame, :width=>300, :height=>200, 
 
54
    @c = TkCanvas.new(frame, :width=>300, :height=>200,
55
55
                      :background=>'black')
56
56
    @c.pack(:padx=>10, :pady=>10, :expand=>true)
57
57
 
58
 
    # Creates a coordinates list of a wave. 
 
58
    # Creates a coordinates list of a wave.
59
59
    @waveCoords = []
60
60
    @backupCoords = []
61
61
    n = 0
67
67
 
68
68
    # Create a smoothed line and arrange for its coordinates to be the
69
69
    # contents of the variable waveCoords.
70
 
    @line = TkcLine.new(@c, @waveCoords, 
 
70
    @line = TkcLine.new(@c, @waveCoords,
71
71
                        :width=>1, :fill=>'green', :smooth=>true)
72
72
 
73
 
    # Main animation "loop". 
 
73
    # Main animation "loop".
74
74
    # Theoretically 100 frames-per-second (==10ms between frames)
75
75
    @timer = TkTimer.new(10){ basicMotion; reverser }
76
76