;;= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
;;
;; FILE NAME: .emacs
;;
;;  DESCRIPTION:
;;
;;  REFERENCE:
;;   http://dymaxion.org/about/emacs/cwarn.html
;;   www.emacs.org
;;   http://www.geocities.com/jerry_y_wang/ve.html
;;   ftp://ftp.ultranet.com/pub/esler/public_html/ccase-mode/clearcase.el
;;
;; DATE            NAME                      REASON
;; --------------- ----------------------    --------
;; 22 Aug, 2001    Chandra Shekhar Nirkhe    creation
;;
;;= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =

(set-cursor-color "orchid")
(set-background-color "snow2")
;;Set the printer command
;(set-variable 'tex-dvi-print-command "lp -dkam_e4 -o postscript -o double ")
;(set-variable 'lpr-command "lp")
;(set-variable 'lpr-add-options "-dkam_e4 -o postscript -o double1")
;(set-variable 'exec-path (cons "/usr/atria/bin" exec-path))
 

;; Displays the name of the file being edited in the title bar.
(setq frame-title-format "%b")
;; Turn on global font-locking
(global-font-lock-mode t)
 

;; set options to be used with grep command used in find-grep-dired
(set-variable 'find-grep-options "-i")

;; set options to be used with ls -l command
(if (string= (getenv "CPU") "HP-UX")
    (set-variable 'find-ls-option "-exec ls -l {} \\;")
  (set-variable 'find-ls-option (cons "-exec ls -l {} \\;" "-l")))

;;Automatically resize the minibuffer as needed:
(resize-minibuffer-mode 1)
(setq resize-minibuffer-mode t)

;;Turn on highlighting for search strings:
(setq search-highlight t)
 

;;Color setting for background of region selected
( set-face-background 'region "yellow")
( setq transient-mark-mode 't)
;; To mark selected region face green
( setq region-face 15 )

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;Key definitions
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(global-set-key "\M-g " 'goto-line)                   ; to goto a specified line no.
(global-set-key "\C-xw" 'append-to-buffer)     ; append to the buffer
(global-set-key "\C-xa" 'beginning-of-buffer)   ; goto the top of the file
(global-set-key "\C-xe" 'end-of-buffer)            ; goto the end of the file
(global-set-key "\C-m" 'newline-and-indent)

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; csnirkhe's elisps files
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(load "~/elisp/keybind.elc")           ; required for custom key binding
(load "~/elisp/clearcase.elc")         ; required for clearcase
;;(load "~/elisp/xemacs-setup.el")  ; xemacs setting
(load "~/elisp/resent.elc")              ; required for showing history of
                                                    ; resently open files
(load "~/elisp/cwarn.elc")              ; warning for if( a = b) condition in
                                                    ; C mode
(load "~/elisp/c-mode.elc")           ; C,C++ and java hook

;;(get-buffer-create "clearcase")
(put 'eval-expression 'disabled nil)

(custom-set-variables
 '(font-lock-mode t nil (font-lock)))
(custom-set-faces
 '(default ((t (:size "14pt"))) t))
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

Hosted by www.Geocities.ws

1