Update of /cvsroot/q-lang/qcalc
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv5236
Modified Files:
qcalc.q
Log Message:
also set the MIME source path, so that relative paths in rich text elements work, too
Index: qcalc.q
===================================================================
RCS file: /cvsroot/q-lang/qcalc/qcalc.q,v
retrieving revision 1.199
retrieving revision 1.200
diff -C2 -d -r1.199 -r1.200
*** qcalc.q 29 Nov 2007 00:59:27 -0000 1.199
--- qcalc.q 29 Nov 2007 01:15:50 -0000 1.200
***************
*** 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
--- 968,976 ----
// clear the log
qt LOG "setText" "" || clearmsg ||
! // go to the new directory and change the MIME source path
! // accordingly
chdir PWD ||
+ qt (qt "QMimeSourceFactory" "defaultFactory" ())
+ "setFilePath" [PWD] ||
// give the interpreter some time to start and read the
// message queue until either the interpreter process has
|
