Variable: org-agenda-custom-commands-local-options

(repeat :tag
	"Local settings for this command.  Remember to quote values"
	(choice :tag "Setting"
		(list :tag "Heading for this block"
		      (const org-agenda-overriding-header)
		      (string :tag "Headline"))
		(list :tag "Files to be searched"
		      (const org-agenda-files)
		      (list (const :format "" quote) (repeat (file))))
		(list :tag "Sorting strategy"
		      (const org-agenda-sorting-strategy)
		      (list (const :format "" quote)
			    (repeat
			     (choice (const time-up) (const time-down)
				     (const timestamp-up)
				     (const timestamp-down)
				     (const scheduled-up)
				     (const scheduled-down)
				     (const deadline-up)
				     (const deadline-down)
				     (const ts-up) (const ts-down)
				     (const tsia-up) (const tsia-down)
				     (const category-keep)
				     (const category-up)
				     (const category-down)
				     (const tag-down) (const tag-up)
				     (const priority-up)
				     (const priority-down)
				     (const urgency-up)
				     (const urgency-down)
				     (const todo-state-up)
				     (const todo-state-down)
				     (const effort-up)
				     (const effort-down)
				     (const habit-up)
				     (const habit-down)
				     (const alpha-up)
				     (const alpha-down)
				     (const user-defined-up)
				     (const user-defined-down)))))
		(list :tag "Prefix format"
		      (const org-agenda-prefix-format :value
			     "  %-12:c%?-12t% s")
		      (string))
		(list :tag "Number of days in agenda"
		      (const org-agenda-span)
		      (list (const :format "" quote)
			    (choice (const :tag "Day" day)
				    (const :tag "Week" week)
				    (const :tag "Fortnight" fortnight)
				    (const :tag "Month" month)
				    (const :tag "Year" year)
				    (integer :tag "Custom"))))
		(list :tag "Fixed starting date"
		      (const org-agenda-start-day)
		      (string :value "2007-11-01"))
		(list :tag "Start on day of week"
		      (const org-agenda-start-on-weekday)
		      (choice :value 1 (const :tag "Today" nil)
			      (integer :tag "Weekday No.")))
		(list :tag "Include data from diary"
		      (const org-agenda-include-diary) (boolean))
		(list :tag "Deadline Warning days"
		      (const org-deadline-warning-days)
		      (integer :value 1))
		(list :tag "Category filter preset"
		      (const org-agenda-category-filter-preset)
		      (list (const :format "" quote)
			    (repeat
			     (string :tag "+category or -category"))))
		(list :tag "Tags filter preset"
		      (const org-agenda-tag-filter-preset)
		      (list (const :format "" quote)
			    (repeat (string :tag "+tag or -tag"))))
		(list :tag "Effort filter preset"
		      (const org-agenda-effort-filter-preset)
		      (list (const :format "" quote)
			    (repeat
			     (string :tag
				     "+=10 or -=10 or +<10 or ->10"))))
		(list :tag "Regexp filter preset"
		      (const org-agenda-regexp-filter-preset)
		      (list (const :format "" quote)
			    (repeat (string :tag "+regexp or -regexp"))))
		(list :tag "Set daily/weekly entry types"
		      (const org-agenda-entry-types)
		      (list (const :format "" quote)
			    (set :greedy t :value
				 (:deadline :scheduled :timestamp
					    :sexp)
				 (const :deadline) (const :scheduled)
				 (const :deadline*)
				 (const :scheduled*)
				 (const :timestamp) (const :sexp))))
		(list :tag "Columns format"
		      (const org-overriding-columns-format)
		      (string :tag "Format"))
		(list :tag "Standard skipping condition" :value
		      (org-agenda-skip-function
		       '(org-agenda-skip-entry-if))
		      (const org-agenda-skip-function)
		      (list (const :format "" quote)
			    (list
			     (choice :tag "Skipping range"
				     (const :tag "Skip entry"
					    org-agenda-skip-entry-if)
				     (const :tag "Skip subtree"
					    org-agenda-skip-subtree-if))
			     (repeat :inline t :tag
				     "Conditions for skipping"
				     (choice :tag "Condition type"
					     (list :tag
						   "Regexp matches"
						   :inline t
						   (const :format ""
							  regexp)
						   (regexp))
					     (list :tag
						   "Regexp does not match"
						   :inline t
						   (const :format ""
							  notregexp)
						   (regexp))
					     (list :tag
						   "TODO state is"
						   :inline t
						   (const todo)
						   (choice
						    (const :tag
							   "Any not-done state"
							   todo)
						    (const :tag
							   "Any done state"
							   done)
						    (const :tag
							   "Any state"
							   any)
						    (list :tag
							  "Keyword list"
							  (const
							   :format ""
							   quote)
							  (repeat
							   (string
							    :tag
							    "Keyword")))))
					     (list :tag
						   "TODO state is not"
						   :inline t
						   (const nottodo)
						   (choice
						    (const :tag
							   "Any not-done state"
							   todo)
						    (const :tag
							   "Any done state"
							   done)
						    (const :tag
							   "Any state"
							   any)
						    (list :tag
							  "Keyword list"
							  (const
							   :format ""
							   quote)
							  (repeat
							   (string
							    :tag
							    "Keyword")))))
					     (const :tag "scheduled"
						    scheduled)
					     (const :tag
						    "not scheduled"
						    notscheduled)
					     (const :tag "deadline"
						    deadline)
					     (const :tag "no deadline"
						    notdeadline)
					     (const :tag "timestamp"
						    timestamp)
					     (const :tag
						    "no timestamp"
						    nottimestamp))))))
		(list :tag "Non-standard skipping condition" :value
		      (org-agenda-skip-function)
		      (const org-agenda-skip-function)
		      (sexp :tag "Function or form (quoted!)"))
		(list :tag "Any variable" (variable :tag "Variable")
		      (sexp :tag "Value (sexp)"))))