[Plplot-cvs] SF.net SVN: plplot:[8779] trunk/www/examples.php

[Alan W. I. <ai...@us...>]

Revision: 8779
           http://plplot.svn.sourceforge.net/plplot/?rev=8779&view=rev
Author:   airwin
Date:     2008-09-19 18:45:28 +0000 (Fri, 19 Sep 2008)

Log Message:
-----------
Alphabetize language list.

Modified Paths:
--------------
     trunk/www/examples.php

Modified: trunk/www/examples.php
===================================================================
--- trunk/www/examples.php	2008-09-19 18:31:42 UTC (rev 8778)
+++ trunk/www/examples.php	2008-09-19 18:45:28 UTC (rev 8779)
@@ -73,32 +73,32 @@
  		<p>Select language to see the source code</p>
  		<form class="codeform" action="examples.php" method="get">
  		<input type="hidden" name="demo" value="$demo_str" />
+		<input type="submit" name="lbind" value="Ada" />
  		<input type="submit" name="lbind" value="C" />
  		<input type="submit" name="lbind" value="C++" />
  		<input type="submit" name="lbind" value="F77" />
  		<input type="submit" name="lbind" value="F95" />
-		<input type="submit" name="lbind" value="Ada" />
-		<input type="submit" name="lbind" value="Tcl" />
  		<input type="submit" name="lbind" value="Java" />
-		<input type="submit" name="lbind" value="Python" />
+		<input type="submit" name="lbind" value="Ocaml" />
  		<input type="submit" name="lbind" value="Octave" />
  		<input type="submit" name="lbind" value="PerlDL" />
-		<input type="submit" name="lbind" value="Ocaml" />
+		<input type="submit" name="lbind" value="Python" />
+		<input type="submit" name="lbind" value="Tcl" />
  		</form>
  END;

  	  switch($lbind) {
+	  case ("Ada"):    $fname = "x" . $demo_str . "a.adb-"; break;
  	  case ("C"):      $fname = "x" . $demo_str . "c.c-"; break;
  	  case ("C++"):$fname = "x" . $demo_str . ".cc-"; break;
  	  case ("F77"):    $fname = "x" . $demo_str . "f.f-"; break;
  	  case ("F95"):    $fname = "x" . $demo_str . "f.f90-"; break;
-	  case ("Ada"):    $fname = "x" . $demo_str . "a.adb-"; break;
-	  case ("Tcl"):    $fname = "x" . $demo_str . ".tcl-";  break;
  	  case ("Java"):   $fname = "x" . $demo_str . ".java-"; break;
-	  case ("Python"): $fname = "xw" . $demo_str . ".py-"; break;
+	  case ("Ocaml"):  $fname = "x" . $demo_str . ".ml-"; break;
  	  case ("Octave"): $fname = "x" . $demo_str . "c.m-"; break;
  	  case ("PerlDL"): $fname = "x" . $demo_str . ".pl-"; break;
-	  case ("Ocaml"):  $fname = "x" . $demo_str . ".ml-"; break;
+	  case ("Python"): $fname = "xw" . $demo_str . ".py-"; break;
+	  case ("Tcl"):    $fname = "x" . $demo_str . ".tcl-";  break;
  	  default:         $fname = "x" . $demo_str . "c.c-";
  	  }



This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.