Changeset 4542 for lang/pascal

Show
Ignore:
Timestamp:
01/13/08 16:08:06 (10 months ago)
Author:
plus7
Message:

check existence of pref.js

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • lang/pascal/GeckoComponents/GeckoSimpleProfile.pas

    r4249 r4542  
    179179  NS_GetService(NS_PREFSERVICE_CID, nsIPrefService, prefSrv); 
    180180  prefFile := NS_GetSpecialDirectory(NS_APP_PREFS_50_FILE); 
     181  if not prefFile.Exists then 
     182    prefFile.Create(NS_IFILE_NORMAL_FILE_TYPE,0666); 
    181183  prefSrv.ResetPrefs; 
    182184  prefSrv.ReadUserPrefs(prefFile);