[q-lang-cvs] qcalc qcalc.q,1.198,1.199

[Albert G. <ag...@us...>]

Update of /cvsroot/q-lang/qcalc
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv28749

Modified Files:
	qcalc.q 
Log Message:
chdir to the spreadsheet directory when opening a spreadsheet, so that relative paths to pixmaps etc. work without any ado

Index: qcalc.q
===================================================================
RCS file: /cvsroot/q-lang/qcalc/qcalc.q,v
retrieving revision 1.198
retrieving revision 1.199
diff -C2 -d -r1.198 -r1.199
*** qcalc.q	28 Nov 2007 09:55:24 -0000	1.198
--- qcalc.q	29 Nov 2007 00:59:27 -0000	1.199
***************
*** 250,254 ****
  		   ("/qcalc/text/highlighting", HL)] ||
  		  save_recent_files DEFAULTS
! 		    where  // get hold of the application defaults
  		      DEFAULTS = qt_new "QSettings" (),
  		      _ = qt DEFAULTS "setPath"
--- 250,254 ----
  		   ("/qcalc/text/highlighting", HL)] ||
  		  save_recent_files DEFAULTS
! 		    where // get hold of the application defaults
  		      DEFAULTS = qt_new "QSettings" (),
  		      _ = qt DEFAULTS "setPath"
***************
*** 968,971 ****
--- 968,973 ----
  		  // clear the log
  		  qt LOG "setText" "" || clearmsg ||
+ 		  // go to the new directory
+ 		  chdir PWD ||
  		  // give the interpreter some time to start and read the
  		  // message queue until either the interpreter process has