 (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"))
+  (interactive)
+  (insert "==========\n")
+  (insert (format-time-string current-date-time-format (current-time)))
+  (insert "\n"))
 
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;; Duplication
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;; Duplicate only the current line
;; Source: http://stackoverflow.com/questions/88399/how-do-i-duplicate-a-whole-line-in-emacs
(defun duplicate-line()
  (interactive)
  (move-beginning-of-line 1)
  (kill-line)
  (yank)
  (open-line 1)
  (next-line 1)
  (yank))

;; This method replaces the above method
;; Duplicate current line or region
;; Source: http://tuxicity.se/emacs/elisp/2010/03/11/duplicate-current-line-or-region-in-emacs.html
(defun duplicate-current-line-or-region (arg)

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

(require 'region-bindings-mode)
(bind-keys
 :map region-bindings-mode-map
 ("c" . copy-with-linenum)
 ("C" . copy-with-linenum-unicode))

(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)


