changeset 127:64776e1f0530

Copy new function for polymorphism.
author gedeone-octave <marcovass89@hotmail.it>
date Tue, 03 Sep 2013 00:18:03 +0200
parents 5608ba9237d4
children d3c29e38e5d2
files post_install.m
diffstat 1 files changed, 11 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/post_install.m	Mon Sep 02 23:58:35 2013 +0200
+++ b/post_install.m	Tue Sep 03 00:18:03 2013 +0200
@@ -1,20 +1,27 @@
 
 function post_install (desc)
+
   private = fullfile (desc.dir, "private");
-  %mkdir(private);
   [status, msg] = mkdir (private);
   if (status != 1)
     error ("couldn't create private directory: %s", msg);
   endif
 
-  movefile ('./src/*.h', private, 'f');
+  [status, msg, msgid] = movefile ('./src/*.h', private, 'f');
+  if (status != 1)
+    error ("couldn't copy file: %s", msg);
+  endif
 
   func = fullfile (desc.dir, "@function");
-  %mkdir(func);
   [status, msg] = mkdir (func);
   if (status != 1)
     error ("couldn't create @function directory: %s", msg);
   endif
 
-  movefile ('./src/feval.oct', func, 'f');
+  [status, msg, msgid] = movefile ('./src/feval.oct', func, 'f');
+  if (status != 1)
+    error ("couldn't copy file: %s", msg);
+  endif
+  delete ('./src/feval.oct');
+
 endfunction