-;; Time-stamp: <2014-10-10 13:17:07 kmodi>
+;; Time-stamp: <2014-10-23 10:45:48 kmodi>
 
 ;; Functions related to editing text in the buffer
 

 ("M-z"     . zap-up-to-char)
 ("M-Z"     . zap-to-char))

(bind-to-modi-map "d" insert-current-date-time)
(bind-to-modi-map "x" eval-and-replace-last-sexp)

(key-chord-define-global "3e" 'toggle-comment-on-line-or-region) ;; alternative to F3
(key-chord-define-global "9o" 'eval-region) ;; alternative to F9
(key-chord-define-global "^^" (λ (insert "λ")))

(setq setup-editing-loaded t) ;; required in setup-perl
(provide 'setup-editing)



(defun insert-current-date-time ()
  "insert the current date and time into current buffer.
Uses `current-date-time-format' for the formatting the date/time."
  (interactive)
  (insert "==========\n")
  (insert (format-time-string current-date-time-format (current-time)))
  (insert "\n"))


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
