Merge pull request #20 from blkperl/ticket_12522_purge_option