;; Enable longlines-mode for LaTeX files
(add-hook 'latex-mode-hook 'longlines-mode)
-;; On utilise Mozilla Firefox
-(defun browse-url-firefox-new-tab (url &optional new-window)
- "Open URL in a new tab in Firefox."
- ;; (interactive (browse-url-interactive-arg "URL: "))
- (let ((cmd (shell-command-to-string
- (concat "mozilla-firefox -a firefox -remote 'openURL("
- url ",new-tab)' > /dev/null"))))
- (unless (string= "" cmd)
- (message "Starting Firefox...")
- (start-process (concat "firefox " url) nil "/bin/sh" "-c"
- (concat "mozilla-firefox " url "|| true"))
- (message "Starting Firefox...done"))))
-
-(setq browse-url-browser-function 'browse-url-firefox-new-tab)
-
;; ,--------------
;; | Les racourcis
;; `--------------
(require 'twittering-mode)
(setq twittering-use-master-password t)
(setq twittering-icon-mode t)
+(setq twittering-scroll-mode t)
(setq twittering-timer-interval 300)
(setq twittering-url-show-status nil)
(add-hook 'twittering-new-tweets-hook
(let ((n twittering-new-tweets-count))
(start-process "twittering-notify" nil "notify-send"
"-i" "/usr/share/pixmaps/gnome-emacs.png"
+ "--hint=int:transient:1"
"New tweets"
(format "You have %d new tweet%s"
n (if (> n 1) "s" ""))))))
+(setq twittering-initial-timeline-spec-string
+ '(":home"
+ ":replies"
+ ":mentions"
+ ":direct_messages"))
;; -> END <-