StumpWM: removed obsolete tweet function

This commit is contained in:
Marcel Kapfer 2018-09-03 08:28:39 +02:00
parent bc4d7e2a95
commit 7ddb6acdd8
Signed by: mmk2410
GPG key ID: CADE6F0C09F21B09

View file

@ -235,14 +235,6 @@
(set-backlight-rel 1)
(set-backlight-rel (- current 5)))))
;; tweet
(defcommand tweet (tweet)
((:string "Tweet: "))
"Tweet"
(run-shell-command (concatenate 'string "cd ~/programs/dart/learning/twitter && dart main.dart -t \"" tweet "\""))
(echo (concatenate 'string "Tweeted: " tweet)))
(define-key *root-map* (kbd "T") "tweet")
(define-key *root-map* (kbd "B") "change-backlight")
(define-key *top-map* (kbd "XF86MonBrightnessUp") "increase-backlight")