diff options
| author | marco <marco@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2010-06-05 13:33:33 +0000 |
|---|---|---|
| committer | marco <marco@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2010-06-05 13:33:33 +0000 |
| commit | cf3328aa6c857f1b19475da426e133e7ea1178aa (patch) | |
| tree | 77304ec215d282ce7ba1ae20031e16777722ca4c /packages/chm | |
| parent | b221c7fa88b5752e19e0f74d32e40a75d62b2dd3 (diff) | |
| download | fpc-cf3328aa6c857f1b19475da426e133e7ea1178aa.tar.gz | |
* fix for mantis 16643, chmproject.savetofile filename doesn't propagate properly
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@15387 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'packages/chm')
| -rw-r--r-- | packages/chm/src/chmfilewriter.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/packages/chm/src/chmfilewriter.pas b/packages/chm/src/chmfilewriter.pas index bf6c860807..9ec8e5a6f2 100644 --- a/packages/chm/src/chmfilewriter.pas +++ b/packages/chm/src/chmfilewriter.pas @@ -233,7 +233,7 @@ var begin Cfg := TXMLConfig.Create(nil); Cfg.StartEmpty := True; - Cfg.Filename := FileName; + Cfg.Filename := AFileName; Cfg.Clear; Cfg.SetValue('Files/Count/Value', Files.Count); for I := 0 to Files.Count-1 do |