(insert ...) won't respect delete-selection-mode

[Xah]

i have a some 20 personal commands that insert some text. However, i
have delete-selection-mode on, meaning that when a region is active,
any typing should delete/override it.

But when calling my insert text commands it will just insert at the
end of region. Here's a example:

(defun insert-date () "Insert current date." (interactive)
  (insert (format-time-string "%Y-%m-%d"))
)

Do i need to modify each commands to check on mark-active and delete-
selection-mode then call delete region first? Or, is there some
variable i can just set?

Thanks.

  Xah
∑ http://xahlee.org/

☄