Удалить все события в iCal

Как я могу удалить все события в iCal? У меня есть куча событий (некоторые повторяются), которые я хочу удалить. Я не хочу вручную удалять / вырезать каждое событие.

Я пытался отклонить события, но они просто становятся серыми.

Я использую OS X 10.6.6.

Applescript:

tell application "iCal"
   tell calendar "My Calendar" -- your calendar here
      set theEvents to every event
      repeat with current_event in theEvents           
         delete current_event
      end repeat
   end tell
end tell

Я решил это, удалив, ~/Library/Calendarsкак предложено здесь .