diff general/funutils/@function_handle/rdivide.m @ 41:79632e7bcb52

Fixes to partial application, added partial application from left

--- a/general/funutils/@function_handle/rdivide.m	Tue Jan 29 17:04:40 2013 +0000
+++ b/general/funutils/@function_handle/rdivide.m	Tue Jan 29 17:22:52 2013 +0000
@@ -6,6 +6,9 @@
 % -> (A{M+1:N}=>B{:}).
 
 function g=rdivide(f,args)
-	g=@(varargin)f(args{:},varargin{:});
+	fns = { @q0, @q1, @(varargin)f(args{:},varargin{:}) };
+	g=fns{1+acount(nargout(f),1)};
+	function q0(varargin), f(args{:},varargin{:}); end
+	function y=q1(varargin), y=f(args{:},varargin{:}); end
 end