hedgewars/uMisc.pas
changeset 5239 f34f391a223b
parent 5052 74a81c276d67
child 5910 c9a4de51b5a0
--- a/hedgewars/uMisc.pas	Sun Jun 12 21:06:48 2011 -0400
+++ b/hedgewars/uMisc.pas	Sun Jun 12 22:34:38 2011 -0400
@@ -79,7 +79,7 @@
 
 // update header information and file name
 
-filename:= ParamStr(1) + '/Screenshots/' + filename + '.bmp';
+filename:= UserPathPrefix + '/Screenshots/' + filename + '.bmp';
 
 head[$02]:= (size + 54) and $ff;
 head[$03]:= ((size + 54) shr 8) and $ff;