branch: externals/ftable
commit 96a0475871b1642582a0c0fb5a361a8af0dd5923
Author: Yuan Fu <caso...@gmail.com>
Commit: Yuan Fu <caso...@gmail.com>
Prepare for ELPA
* ftable.el (ftable): Remove custom options.
(ftable-fill, ftable-edit-cell, ftable-reformat): Add autoload cookie.
---
ftable.el | 29 +++++++++++++++++++++++++----
1 file changed, 25 insertions(+), 4 deletions(-)
diff --git a/ftable.el b/ftable.el
index c587e84..71da62b 100644
--- a/ftable.el
+++ b/ftable.el
@@ -1,8 +1,28 @@
;;; ftable.el --- Fill a table to fit in n columns -*- lexical-binding:
t; -*-
+;; Copyright (C) 2019-2021 Free Software Foundation, Inc.
+
;; Author: Yuan Fu <caso...@gmail.com>
+;; Maintainer: Yuan Fu <caso...@gmail.com>
+;; URL: https://github.com/casouri/ftable
+;; Version: 1.0
+;; Keywords: convenience, text, table
+;; Package-Requires: ((emacs "26.0"))
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+;; GNU General Public License for more details.
-;;; This file is NOT part of GNU Emacs
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs. If not, see <https://www.gnu.org/licenses/>.
;;; Commentary:
;;
@@ -38,9 +58,7 @@
;;; Customization
-(defgroup ftable
- '((ftable-fill-column custom-variable)
- (ftable-recognize-table custom-variable))
+(defgroup ftable nil
"Fill (auto-layout) tables."
:group 'text)
@@ -494,6 +512,7 @@ Return a new string."
;;; Convenience
+;;;###autoload
(defun ftable-fill ()
"Fill the table (or paragraph) at point."
(interactive)
@@ -512,6 +531,7 @@ Return a new string."
#'table-recognize-region))
(fill-paragraph))))
+;;;###autoload
(defun ftable-edit-cell ()
"Edit the cell at point."
(interactive)
@@ -552,6 +572,7 @@ Return a new string."
(when cell-p
#'table-recognize-region))))))
+;;;###autoload
(defun ftable-reformat (style)
"Change box drawing STYLE for table at point.
STYLE can be ’ascii or ’unicode."
