Permalink
Browse files

Removed unnecessary setq

  • Loading branch information...
1 parent 235b7b4 commit c9cc79bf635f700c34a5f7515ee02ae84ce68824 Dan Leslie committed with defunkt Feb 26, 2010
Showing with 10 additions and 10 deletions.
  1. +10 −10 gist.el
View
20 gist.el
@@ -92,16 +92,16 @@ With a prefix argument, makes a private paste."
(name (file-name-nondirectory file))
(ext (or (cdr (assoc major-mode gist-supported-modes-alist))
(file-name-extension file)
- "txt")))
- (setq url-max-redirections 5)
- (setq url-request-method "POST")
- (setq url-request-data (gist-make-query-string
- `(,@(if private '(("action_button" . "private")))
- ("login" . ,login)
- ("token" . ,token)
- ("file_ext[gistfile1]" . ,(concat "." ext))
- ("file_name[gistfile1]" . ,name)
- ("file_contents[gistfile1]" . ,(buffer-substring begin end)))))
+ "txt"))
+ (url-max-redirections 5)
+ (url-request-method "POST")
+ (url-request-data (gist-make-query-string
+ `(,@(if private '(("action_button" . "private")))
+ ("login" . ,login)
+ ("token" . ,token)
+ ("file_ext[gistfile1]" . ,(concat "." ext))
+ ("file_name[gistfile1]" . ,name)
+ ("file_contents[gistfile1]" . ,(buffer-substring begin end))))))
(url-retrieve "http://gist.github.com/gists"
(or callback 'gist-url-retrieved-callback)))))

0 comments on commit c9cc79b

Please sign in to comment.