org-mobile: Remove references to "MobileOrg" specific application

* lisp/org-mobile.el (org-mobile-files):
(org-mobile-use-encryption):
(org-mobile-encryption-password):
(org-mobile-capture-file):
(org-mobile-index-file):
(org-mobile-agendas):
(org-mobile-action-alist):
(org-mobile-edit): Remove reference to "MobileOrg" since the protocol
is not tied to a specific implementation.
This commit is contained in:
Nicolas Goaziou 2018-09-29 13:43:32 +02:00
parent 241eb8ea7a
commit d99cc7fb4d
1 changed files with 42 additions and 30 deletions

View File

@ -24,12 +24,12 @@
;;
;;; Commentary:
;;
;; This file contains the code to interact with Richard Moreland's
;; iPhone application MobileOrg, as well as with the Android version
;; by Matthew Jones. This code is documented in Appendix B of the Org
;; manual. The code is not specific for the iPhone and Android - any
;; external viewer/flagging/editing application that uses the same
;; conventions could be used.
;; This file contains the code to interact with a mobile application,
;; such as Richard Moreland's iPhone application MobileOrg, or the
;; Android version by Matthew Jones. This code is documented in
;; Appendix B of the Org manual. The code is not specific for the
;; iPhone and Android - any external viewer/flagging/editing
;; application that uses the same conventions could be used.
(require 'org)
(require 'org-agenda)
@ -45,15 +45,17 @@
:group 'org)
(defcustom org-mobile-files '(org-agenda-files)
"Files to be staged for MobileOrg.
"Files to be staged for the mobile application.
This is basically a list of files and directories. Files will be staged
directly. Directories will be search for files with the extension `.org'.
directly. Directories will be search for files with the extension \".org\".
In addition to this, the list may also contain the following symbols:
org-agenda-files
`org-agenda-files'
This means include the complete, unrestricted list of files given in
the variable `org-agenda-files'.
org-agenda-text-search-extra-files
`org-agenda-text-search-extra-files'
Include the files given in the variable
`org-agenda-text-search-extra-files'"
:group 'org-mobile
@ -84,12 +86,14 @@ org-agenda-text-search-extra-files
(defcustom org-mobile-use-encryption nil
"Non-nil means keep only encrypted files on the WebDAV server.
Encryption uses AES-256, with a password given in
`org-mobile-encryption-password'.
When nil, plain files are kept on the server.
Turning on encryption requires setting the same password in the MobileOrg
application. Before turning this on, check of MobileOrg does already
support it - at the time of this writing it did not yet."
`org-mobile-encryption-password'. When nil, plain files are kept
on the server.
Turning on encryption requires setting the same password in the
mobile application. Before turning this on, check if the mobile
application does support it."
:group 'org-mobile
:version "24.1"
:type 'boolean)
@ -104,9 +108,10 @@ You might want to put this file into a directory where only you have access."
(defcustom org-mobile-encryption-password ""
"Password for encrypting files uploaded to the server.
This is a single password which is used for AES-256 encryption. The same
password must also be set in the MobileOrg application. All Org files,
including mobileorg.org will be encrypted using this password.
password must also be set in the mobile application. All Org files,
including \"mobileorg.org\" will be encrypted using this password.
SECURITY CONSIDERATIONS:
@ -129,7 +134,7 @@ session."
(or (org-string-nw-p org-mobile-encryption-password)
(org-string-nw-p org-mobile-encryption-password-session)
(setq org-mobile-encryption-password-session
(read-passwd "Password for MobileOrg: " t))))
(read-passwd "Password for mobile application: " t))))
(defcustom org-mobile-inbox-for-pull "~/org/from-mobile.org"
"The file where captured notes and flags will be appended to.
@ -142,23 +147,25 @@ been appended to the file given here. This file should be in
(defconst org-mobile-capture-file "mobileorg.org"
"The capture file where the mobile stores captured notes and flags.
This should not be changed, because MobileOrg assumes this name.")
This must not be changed, because the mobile application assumes this name.")
(defcustom org-mobile-index-file "index.org"
"The index file with links to all Org files that should be loaded by MobileOrg.
Relative to `org-mobile-directory'. The Address field in the MobileOrg setup
should point to this file."
"Index file with links to all Org files.
It should be loaded by the mobile application. The file name is
relative to `org-mobile-directory'. The \"Address\" field in the
mobile application setup should point to this file."
:group 'org-mobile
:type 'file)
(defcustom org-mobile-agendas 'all
"The agendas that should be pushed to MobileOrg.
"The agendas that should be pushed to the mobile application.
Allowed values:
default the weekly agenda and the global TODO list
custom all custom agendas defined by the user
all the custom agendas and the default ones
list a list of selection key(s) as string."
`default' the weekly agenda and the global TODO list
`custom' all custom agendas defined by the user
`all' the custom agendas and the default ones
`list' a list of selection key(s) as string."
:group 'org-mobile
:version "24.1"
:type '(choice
@ -229,7 +236,9 @@ using `rsync' or `scp'.")
(defconst org-mobile-action-alist '(("edit" . org-mobile-edit))
"Alist with flags and actions for mobile sync.
When flagging an entry, MobileOrg will create entries that look like
When flagging an entry, the mobile application creates entries
that look like
* F(action:data) [[id:entry-id][entry title]]
@ -1037,7 +1046,9 @@ be returned that indicates what went wrong."
(insert new)
(delete-region (point) (+ (point) (length current)))
(org-align-tags))
(t (error "Heading changed in MobileOrg and on the computer")))))))
(t
(error
"Heading changed in the mobile device and on the computer")))))))
((eq what 'addheading)
(if (org-at-heading-p) ; if false we are in top-level of file
@ -1090,7 +1101,8 @@ be returned that indicates what went wrong."
(outline-next-heading)
(point))))
t)
(t (error "Body was changed in MobileOrg and on the computer")))))))
(t (error
"Body was changed in the mobile device and on the computer")))))))
(defun org-mobile-tags-same-p (list1 list2)
"Are the two tag lists the same?"