[Octave-cvsupdate] SF.net SVN: octave:[10244] trunk/octave-forge

[<jpi...@us...>]

Revision: 10244
          http://octave.svn.sourceforge.net/octave/?rev=10244&view=rev
Author:   jpicarbajal
Date:     2012-04-16 10:33:04 +0000 (Mon, 16 Apr 2012)
Log Message:
-----------
geometry: adding functions to polygon2d
admin: removing package after html generation

Modified Paths:
--------------
    trunk/octave-forge/admin/releasePKG.m
    trunk/octave-forge/main/geometry/inst/polygons2d/supportFunction.m

Modified: trunk/octave-forge/admin/releasePKG.m
===================================================================
--- trunk/octave-forge/admin/releasePKG.m	2012-04-16 10:17:46 UTC (rev 10243)
+++ trunk/octave-forge/admin/releasePKG.m	2012-04-16 10:33:04 UTC (rev 10244)
@@ -139,6 +139,10 @@
       warning ("md5sum failed.\n");
     end
 
+    % Uninstall package
+    printf("Uninstalling...\n");
+    fflush(stdout);
+    pkg ('uninstall', pkgname);
 
   endif % do_doc
 

Modified: trunk/octave-forge/main/geometry/inst/polygons2d/supportFunction.m
===================================================================
--- trunk/octave-forge/main/geometry/inst/polygons2d/supportFunction.m	2012-04-16 10:17:46 UTC (rev 10243)
+++ trunk/octave-forge/main/geometry/inst/polygons2d/supportFunction.m	2012-04-16 10:33:04 UTC (rev 10244)
@@ -47,24 +47,19 @@
 
 function h = supportFunction(polygon, varargin)
   N = 24;
-  u = 0:2*pi/N:2*pi*(1-1/N);
+  u = (0:2*pi/N:2*pi*(1-1/N)).';
 
   if length(varargin)==1
       var = varargin{1};
       if length(var)==1
           N = var;
-          u = 0:2*pi/N:2*pi*(1-1/N);
+          u = (0:2*pi/N:2*pi*(1-1/N)).';
       else
-          u = var;
+          u = var(:);
       end
   end
 
-  % ensure u vertical vector
-  if size(u, 1)==1
-      u=u';
-  end
 
-
   h = zeros(size(u));
 
   for i=1:length(u)

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