.emacs-my
changeset 1587 8770e2984f58
parent 1586 6aff838af671
child 1588 a2f88a6df8ab
equal deleted inserted replaced
1586:6aff838af671 1587:8770e2984f58
  1507 
  1507 
  1508 (eval-when 'compile (require 'calendar))
  1508 (eval-when 'compile (require 'calendar))
  1509 
  1509 
  1510 ;; (setq mark-holidays-in-calendar t)
  1510 ;; (setq mark-holidays-in-calendar t)
  1511 ;; (setq all-christian-calendar-holidays t)
  1511 ;; (setq all-christian-calendar-holidays t)
  1512 ;; (setq calendar-date-display-form (quote ((format "%04s-%02d-%02d" year (string-to-int month) (string-to-int day)))))
  1512 ;; (setq calendar-date-display-form (quote ((format "%04s-%02d-%02d" year (string-to-number month) (string-to-number day)))))
  1513 ;; (setq calendar-time-display-form (quote (24-hours ":" minutes (if time-zone " (") time-zone (if time-zone ")"))))
  1513 ;; (setq calendar-time-display-form (quote (24-hours ":" minutes (if time-zone " (") time-zone (if time-zone ")"))))
  1514 (setq calendar-week-start-day 1)
  1514 (setq calendar-week-start-day 1)
  1515 (setq calendar-date-style 'iso)
  1515 (setq calendar-date-style 'iso)
  1516 
  1516 
  1517 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1517 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  3361                                 (when (file-exists-p full-path) full-path)))
  3361                                 (when (file-exists-p full-path) full-path)))
  3362                             my-java-exeption-dirs))
  3362                             my-java-exeption-dirs))
  3363         (if (not path)
  3363         (if (not path)
  3364             (message "Can't find file %s.java" file)
  3364             (message "Can't find file %s.java" file)
  3365           (find-file-other-window path)
  3365           (find-file-other-window path)
  3366           (goto-line (string-to-int line)))))))
  3366           (goto-line (string-to-number line)))))))
  3367 
  3367 
  3368 (my--eval-after-load log4-hi-mode
  3368 (my--eval-after-load log4-hi-mode
  3369   (define-key log4-hi-mode-map [C-return] #'my-java-exeption))
  3369   (define-key log4-hi-mode-map [C-return] #'my-java-exeption))
  3370 
  3370 
  3371 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  3371 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;