+ "* COMMENT [[elisp:(debbugs-org-show-next-reports %s)][Next bugs]]\n\n"
+ hits)))
+ (insert "* COMMENT Local " "Variables\n")
+ (when debbugs-org-ids
+ (insert "#+NAME: init\n"
+ "#+BEGIN_SRC elisp\n"
+ (format "(setq debbugs-org-ids '%s)\n" debbugs-org-ids)
+ "#+END_SRC\n\n"))
+ (insert "# Local " "Variables:\n"
+ "# mode: org\n"
+ "# eval: (debbugs-org-mode 1)\n")
+ (when debbugs-org-ids
+ (insert (format "# eval: (%s \"init\")\n"
+ (if (macrop 'org-sbe) "org-sbe" "sbe"))))
+ (insert "# End:\n")
+ (goto-char (point-min))
+ (org-overview)
+ (set-buffer-modified-p nil))))