3322 

  3322 

  3323 (my--eval-after-load sml

  3323 (my--eval-after-load sml

  3324   (define-key sml-mode-map (kbd "C-c C-p") 'sml-send-function))

  3324   (define-key sml-mode-map (kbd "C-c C-p") 'sml-send-function))

  3325 

  3325 

  3326 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

  3326 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

  3328 

  3328 

  3329 (if (>= emacs-major-version 23)

  3329 (if (>= emacs-major-version 23)

  3330     (add-to-list 'auto-mode-alist '("\\.js$" . js-mode))

  3330     (add-to-list 'auto-mode-alist '("\\.js$" . js-mode))

  3331   (add-to-list 'auto-mode-alist '("\\.js$" . javascript-generic-mode))

  3331   (add-to-list 'auto-mode-alist '("\\.js$" . javascript-generic-mode))

  3332   )

  3332   )

  3339 

  3339 

  3340 ;; BUG: all single char comments do not stop highlighting on end of line but

  3340 ;; BUG: all single char comments do not stop highlighting on end of line but

  3341 ;; go to end of buffer. To fix use code:

  3341 ;; go to end of buffer. To fix use code:

  3342 ;; (setq auto-mode-alist (rassq-delete-all 'js-mode auto-mode-alist))

  3342 ;; (setq auto-mode-alist (rassq-delete-all 'js-mode auto-mode-alist))

  3343 ;; (add-to-list 'auto-mode-alist '("\\.js$" . c++-mode))

  3343 ;; (add-to-list 'auto-mode-alist '("\\.js$" . c++-mode))

  3344 

  3347 

  3345 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

  3348 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

  3346 (message "json")

  3349 (message "json")

  3347 

  3350 

  3348 (defun my-json-mode-hook ()

  3351 (defun my-json-mode-hook ()