comment out the STDOUT part

init.el

;; ;; omit the result to STDOUT after return when using emacs/emacsclient -e "expression"
;; (when (not (display-graphic-p))
;;   (define-advice server-eval-and-print (:filter-args (args) no-print)
;;  (list (car args) nil)))

(setq org-agenda-custom-commands
      '(("c" "Simple agenda view"
         ((tags "PRIORITY=\"A\""
                ((org-agenda-skip-function '(org-agenda-skip-entry-if 'todo 'done))
                 (org-agenda-overriding-header "High-priority unfinished tasks:")))
          (agenda "")
          (alltodo "")))
        ))
(setq org-capture-templates
      '(("a" "My TODO task format." entry
         (file "~/Org/todo.org")
         "* TODO %?
SCHEDULED: %t")))
;; search all items including archives
(setq org-agenda-text-search-extra-files '(agenda-archives))
;; mark all children DONE when mark parent DONE
(setq org-enforce-todo-dependencies t)
(setq org-log-reschedule 'time)
(bind-key* "C-c a" 'org-agenda)
(setq org-agenda-span 15
      org-agenda-start-on-weekday nil
      org-agenda-start-day "-7d")
;; Use specific fils as source of agenda
(setq org-agenda-files
      (list "~/Org/todo.org"
            ;; "~/Org/school.org"
            ;; "~/Org/home.org"
            ))
;; include all files in ~/Org as the source of org-agenda
;; (setq org-agenda-files '("~/Org/"))



(setq org-todo-keywords
          '((sequence "TODO(t)" "IN-PROGRESS(i)" "WAITING(w)" "|" "DONE(d)" "CANCELED(c)")
            ;; multiple sets for one file
            ;; (sequence "REPORT(r)" "BUG(b)" "KNOWNCAUSE(k)""|" "FIXED(f)")
            ;; (sequence "|" "CANCELED(c)")
            ))

# delete "C-c a" bingind in org-mode-map