app/twitter: error handling for =twitter
This commit is contained in:
parent
bdf84afe68
commit
3edd12a650
1 changed files with 12 additions and 6 deletions
|
@ -5,12 +5,18 @@
|
|||
(interactive)
|
||||
(+workspace-switch "Twitter" t)
|
||||
(delete-other-windows)
|
||||
(condition-case ex
|
||||
(progn
|
||||
(call-interactively 'twit)
|
||||
(unless (get-buffer (car twittering-initial-timeline-spec-string))
|
||||
(error "Failed to open twitter"))
|
||||
(switch-to-buffer (car twittering-initial-timeline-spec-string))
|
||||
(dolist (name (cdr twittering-initial-timeline-spec-string))
|
||||
(split-window-horizontally)
|
||||
(switch-to-buffer name))
|
||||
(balance-windows))
|
||||
('error
|
||||
(+twitter/quit-all))))
|
||||
|
||||
;;;###autoload
|
||||
(defun +twitter/quit ()
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue