put into URL not "putting"

[Derek Bump]

Would someone be so kind and please analyze the following script to tell 
me why it will only write the data to the Preferences file just once, 
and every time afterward it will not write anything?


on setPref prefName,prefData
   put prefData into preferencesData[prefName]
   put the keys of preferencesData into theKeys
   repeat with x=1 to the number of lines in theKeys
     put line x of theKeys & "=" & preferencesData[(line x of theKeys)] 
&cr after newData
   end repeat
   put newData into url ("file:Preferences.dat")
end setPref


Derek Bump
Dreamscape Software
_______________________________________________
Compress Images Easily with JPEGCompress
http://www.dreamscapesoftware.com/