al-texinfo.el 1.4 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950
  1. ;;; al-texinfo.el --- Additional functionality for texinfo
  2. ;; Copyright © 2016 Alex Kost
  3. ;; This program is free software; you can redistribute it and/or modify
  4. ;; it under the terms of the GNU General Public License as published by
  5. ;; the Free Software Foundation, either version 3 of the License, or
  6. ;; (at your option) any later version.
  7. ;; This program is distributed in the hope that it will be useful,
  8. ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  9. ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  10. ;; GNU General Public License for more details.
  11. ;; You should have received a copy of the GNU General Public License
  12. ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
  13. ;;; Code:
  14. (require 'texinfo)
  15. (define-skeleton al/texinfo-insert-@menu
  16. "Insert `@menu' clause in a Texinfo buffer."
  17. nil
  18. "@menu\n" _ "@end menu\n")
  19. (define-skeleton al/texinfo-insert-@example
  20. "Insert `@example' clause in a Texinfo buffer."
  21. nil
  22. "@example\n" _ "@end example\n")
  23. (define-skeleton al/texinfo-insert-@itemize
  24. "Insert `@itemize' clause in a Texinfo buffer."
  25. nil
  26. "@itemize " _ "\n@end itemize\n")
  27. (define-skeleton al/texinfo-insert-@table
  28. "Insert `@table' clause in a Texinfo buffer."
  29. nil
  30. "@table " _ "\n@end table\n")
  31. (define-skeleton al/texinfo-insert-@deffn
  32. "Insert `@deffn' clause in a Texinfo buffer."
  33. nil
  34. "@deffn " _ "\n@end deffn\n")
  35. (provide 'al-texinfo)
  36. ;;; al-texinfo.el ends here