30     ;; For graphical environment.

    30     ;; For graphical environment.

    31     (progn

    31     (progn

    32       (set-background-color "white")

    32       (set-background-color "white")

    33       (set-foreground-color "black")

    33       (set-foreground-color "black")

    34       (set-cursor-color "brown")

    34       (set-cursor-color "brown")

    35       (setq cursor-type 'box)           ; box, hollow, bar, hbar

    36       (setq cursor-type 'box)           ; box, hollow, bar, hbar

    36       ;;(setq blink-matching-delay 0.01)

    37       ;;(setq blink-matching-delay 0.01)

    37       (blink-cursor-mode 1)

    38       (blink-cursor-mode 1)

    38       ;; (set-face-font 'default "7x14")

    39       ;; (set-face-font 'default "7x14")

    39       (fringe-mode 'default)

    40       (fringe-mode 'default)