   "Activate zenburn theme."
   (interactive)
   (setq dark-theme t)
-  (load-theme 'zenburn t))
+  (load-theme 'zenburn t)
+  (set-face-attribute 'linum nil :background "#3F3F3F" :foreground "dim gray")
+  )
 
 ;;leuven theme
 (defun leuven ()
   "Activate leuven theme."
   (interactive)
   (setq dark-theme nil)
-  (load-theme 'leuven t))
+  (load-theme 'leuven t)
+  (set-face-attribute 'linum nil :background "#FFFFFF" :foreground "dim gray")
+  )
 
 (setq global-font-lock-mode t ;; enable font-lock or syntax highlighting globally
       font-lock-maximum-decoration t ;; use the maximum decoration level available for color highlighting

  "change cursor color according to some minor modes."
  ;; set-cursor-color is somewhat costly, so we only call it when needed:
  (let ((color
         (if buffer-read-only "yellow"
           (if overwrite-mode "red"
             (if dark-theme "white" "dark orange")))))
    (unless (and
             (string= color hcz-set-cursor-color-color)
             (string= (buffer-name) hcz-set-cursor-color-buffer))

;; Time-stamp: <2014-06-05 09:34:33 kmodi>

;; Set up the looks of emacs

