diff options
| -rw-r--r-- | tekuti.el | 8 |
1 files changed, 6 insertions, 2 deletions
@@ -43,7 +43,11 @@ (require 'org) -(defvar tekuti-host "http://127.0.0.1:8080") +(defvar tekuti-host "http://127.0.0.1:8080" + "The host where tekuti is running. +This should be the base URL of your blog. Where adding ‘/admin’ +will get you into the admin area of your blog. This shouldn't end +with a ‘/’.") (defun tekuti--format-date (&optional date) "Format DATE into a date that tekuti understands." @@ -136,7 +140,7 @@ (url-request-data (tekuti-form-encode-data data)) (previous-update-url (tekuti--get-update-url)) (updatep (not (null previous-update-url)))) - (url-retrieve (format "%s%s" tekuti-host + (url-retrieve (format "%s%s" (string-trim-right tekuti-host "/") (or previous-update-url "/admin/new-post")) #'tekuti--send-finished |