Index: scripts/control/system/packedform.m
===================================================================
RCS file: /cvs/octave/scripts/control/system/packedform.m,v
retrieving revision 1.3
diff -u -p -r1.3 packedform.m
--- scripts/control/system/packedform.m	26 Apr 2005 19:24:30 -0000	1.3
+++ scripts/control/system/packedform.m	12 Apr 2007 15:19:01 -0000
@@ -18,7 +18,7 @@
 ## 02110-1301 USA.
 
 save_var = page_screen_output;
-page_screen_output = 1;
+page_screen_output (1);
 disp("Description of system data structure:")
 disp("A linear system is stored in a structure, and may be represented in")
 disp("ss (state space), tf (transfer function),  and/or zp (zero-pole-gain)")
@@ -93,4 +93,4 @@ disp("  sys2ss          sys2tf          
 disp("  sysdimensions   sysgetsignals   syssetsignals   sysgettype")
 disp("  zp    ")
 disp("to create/access internal variables.  ");
-page_screen_output = save_var;
+page_screen_output (save_var);