--- a/.emacs-my	Fri Oct 26 01:09:54 2012 +0300
+++ b/.emacs-my	Sun Oct 28 13:31:32 2012 +0200
@@ -1836,6 +1836,49 @@
 ;; (setq erc-kill-server-buffer-on-quit t)
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+(message "devel, programming")
+
+(which-func-mode 1)
+
+(add-to-list 'auto-mode-alist '("\\.cu$" . c-mode))
+
+(defun my-c++-header-file-p ()
+  "Return non-nil, if in a C++ header."
+  (and (string-match "\\.h$"
+                     (or (buffer-file-name)
+                         (buffer-name)))
+       (save-excursion
+         (re-search-forward "\\_<class\\_>" nil t))))
+
+(when (>= emacs-major-version 22)
+  (add-to-list 'magic-mode-alist '(my-c++-header-file-p . c++-mode))
+  )
+
+(setq-default comment-style (quote indent))
+(setq-default comment-column 44)
+(setq-default comment-fill-column my-fill-column)
+
+(mapc (lambda (hook) (add-hook hook (lambda () (setq fill-column my-fill-column)) ))
+      (append my-devel-mode-hook-list my-text-mode-hook-list))
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+(message "diff, patch, ediff, emerge")
+
+(setq diff-switches "-u")
+
+(setq ediff-diff-options "")
+(setq ediff-custom-diff-options "-u")
+(setq ediff-window-setup-function 'ediff-setup-windows-plain)
+(setq ediff-split-window-function 'split-window-vertically)
+
+(when window-system
+  (eval-after-load 'diff-mode
+    '(progn
+       (set-face-foreground 'diff-added-face "DarkGreen")
+       (set-face-foreground 'diff-removed-face "DarkRed")
+  )))
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (message "vc-mode, VCS, version control, cvs, svn, mercurial, hg, bazaar, bzr, git, fossil")
 
 ;; `-b' switch to ignore changes in whitespaces.
@@ -1893,49 +1936,6 @@
   )
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-(message "devel, programming")
-
-(which-func-mode 1)
-
-(add-to-list 'auto-mode-alist '("\\.cu$" . c-mode))
-
-(defun my-c++-header-file-p ()
-  "Return non-nil, if in a C++ header."
-  (and (string-match "\\.h$"
-                     (or (buffer-file-name)
-                         (buffer-name)))
-       (save-excursion
-         (re-search-forward "\\_<class\\_>" nil t))))
-
-(when (>= emacs-major-version 22)
-  (add-to-list 'magic-mode-alist '(my-c++-header-file-p . c++-mode))
-  )
-
-(setq-default comment-style (quote indent))
-(setq-default comment-column 44)
-(setq-default comment-fill-column my-fill-column)
-
-(mapc (lambda (hook) (add-hook hook (lambda () (setq fill-column my-fill-column)) ))
-      (append my-devel-mode-hook-list my-text-mode-hook-list))
-
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-(message "diff, patch, ediff, emerge")
-
-(setq diff-switches "-u")
-
-(setq ediff-diff-options "")
-(setq ediff-custom-diff-options "-u")
-(setq ediff-window-setup-function 'ediff-setup-windows-plain)
-(setq ediff-split-window-function 'split-window-vertically)
-
-(when window-system
-  (eval-after-load 'diff-mode
-    '(progn
-       (set-face-foreground 'diff-added-face "DarkGreen")
-       (set-face-foreground 'diff-removed-face "DarkRed")
-  )))
-
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (message "indenting")
 
 (setq standard-indent 4)