Spelling fixes.

1 files changed, 5 insertions, 5 deletions

diff --git a/lisp/org/org-taskjuggler.el b/lisp/org/org-taskjuggler.el
index 0d9516a389e..1fb3114bf3f 100644
--- a/lisp/org/org-taskjuggler.el
+++ b/lisp/org/org-taskjuggler.el
@@ -70,7 +70,7 @@
 ;; "taskjuggler_project" (or whatever you customized
 ;; `org-export-taskjuggler-project-tag' to). You are now ready to
 ;; export the project plan with `org-export-as-taskjuggler-and-open'
-;; which will export the project plan and open a gant chart in
+;; which will export the project plan and open a Gantt chart in
 ;; TaskJugglerUI.
 ;;
 ;; * Resources
@@ -354,8 +354,8 @@ information, all the properties, etc."
   (let* ((props (org-entry-properties))
          (components (org-heading-components))
          (level (nth 1 components))
-         (headline 
-          (replace-regexp-in-string 
+         (headline
+          (replace-regexp-in-string
            "\"" "\\\"" (nth 4 components) t t)) ; quote double quotes in headlines
          (parent-ordered (org-taskjuggler-parent-is-ordered-p)))
     (push (cons "level" level) props)
@@ -405,10 +405,10 @@ deeper), then it's not a leaf."
             (successor (car (cdr tasks))))
         (cond
          ;; if a task has no successors it is a leaf
-         ((null successor) 
+         ((null successor)
           (push (cons (cons "leaf-node" t) task) new-list))
          ;; if the successor has a lower level than task it is a leaf
-         ((<= (cdr (assoc "level" successor)) (cdr (assoc "level" task))) 
+         ((<= (cdr (assoc "level" successor)) (cdr (assoc "level" task)))
           (push (cons (cons "leaf-node" t) task) new-list))
          ;; otherwise examine the rest of the tasks
          (t (push task new-list))))