--- a/.emacs-my	Sun Mar 14 20:12:11 2010 +0200
+++ b/.emacs-my	Sun Mar 14 20:20:26 2010 +0200
@@ -796,12 +796,8 @@
 (setq-default comment-column 44)
 (setq-default comment-fill-column my-fill-column)
 
-(mapc (lambda (mode)
-        (add-hook mode
-                  (lambda ()
-                    (setq fill-column my-fill-column) )
-                  ))
-      '(c-mode-hook lisp-mode-hook))
+(mapc (lambda (hook) (add-hook hook (lambda () (setq fill-column my-fill-column)) ))
+      my-devel-mode-hook-list)
 
 ;; ----------------------------------------------------------------------
 ;; diff, patch.