 
 (when window-system
   (require 'package)
-  (add-to-list 'package-archives '("marmalade" . "http://marmalade-repo.org/packages/"))
+  (add-to-list 'package-archives
+               '("marmalade" . "http://marmalade-repo.org/packages/"))
   (package-initialize)
 
   (let ((missing '()))

(setq make-backup-files nil)
(setq inhibit-splash-screen t)
(setq inhibit-startup-message t)
(setq inhibit-startup-echo-area-message "sri")
(setq initial-scratch-message nil)
(setq visible-bell nil)
(setq ring-bell-function (lambda ()))

              'my-shell-forward-char-or-previous-history)
            (define-key shell-mode-map (kbd "<down>")
              'my-shell-next-line-or-next-history)))

(add-hook 'view-mode-hook
          (lambda ()
            (define-key view-mode-map (kbd "<up>")
              'scroll-up)
            (define-key view-mode-map (kbd "<up>")
              'scroll-up)))

(global-font-lock-mode -1)

