--- a/.emacs-my	Mon Jul 07 23:43:45 2008 +0300
+++ b/.emacs-my	Mon Jul 07 23:47:54 2008 +0300
@@ -665,9 +665,9 @@
 
 (add-to-list 'auto-mode-alist '("\\.cu$" . c-mode))
 
+(setq comment-style (quote indent))
+
 (setq-default show-trailing-whitespace t)
-;; (add-hook 'c-mode-hook '(lambda ()
-;;                           (setq show-trailing-whitespace t)))
 
 ;; ----------------------------------------------------------------------
 ;; Diff, patch
@@ -685,10 +685,9 @@
 (setq-default tab-width 4)
 (setq-default indent-tabs-mode nil)     ; t - будут вставляться \t
 (setq tab-always-indent t)
-(setq tab-stop-list (quote (0 4 8 12 16 20 24 28 32 36 40)))
 (setq c-tab-always-indent t)
-
-(setq comment-style (quote indent))
+(loop for x downfrom 40 to 1 do
+      (setq tab-stop-list (cons (* x 4) tab-stop-list)))
 
 ;; ----------------------------------------------------------------------
 ;; Diff.
@@ -761,9 +760,6 @@
 ;;   ;; add my personal style and set it for the current buffer
 ;;   (c-add-style "PERSONAL" my-c-style t)
 ;;   ;; other customizations
-;;   (setq tab-width 8
-;;         ;; this will make sure spaces are used instead of tabs
-;;         indent-tabs-mode nil)
 ;;   ;; we like auto-newline and hungry-delete
 ;;   (c-toggle-auto-hungry-state 1)
 ;;   ;; key bindings for all supported languages.  We can put these in