v2.8.0 1.<space> should convert 。 to . (679e7b0f) · Commits · Yuanle Song / zero-el

zero-input-framework.el

+5 −3

Original line number	Diff line number	Diff line
		@@ -133,7 +133,7 @@ If item is not in lst, return nil."

		;; zero-input-el version
		(defvar zero-input-version nil "Zero package version.")
		(setq zero-input-version "2.7.1")
		(setq zero-input-version "2.8.0")

		;; FSM state
		(defconst zero-input--state-im-off 'IM-OFF)
		@@ -778,7 +778,9 @@ Argument CH the character that was inserted."
		(or (my-digit-char-p ch)
		(my-capital-letter-p ch)))
		(equal ?。 (ring-ref zero-input-recent-insert-chars 1))
		(my-digit-char-p (ring-ref zero-input-recent-insert-chars 0)))
		(let ((ch (ring-ref zero-input-recent-insert-chars 0)))
		(or (my-digit-char-p ch)
		(eq ch ?\s))))
		(delete-char -2)
		(insert "." (car (ring-elements zero-input-recent-insert-chars))))))))

+6 −4

Original line number	Diff line number	Diff line
		@@ -12,7 +12,7 @@
		;; See the License for the specific language governing permissions and
		;; limitations under the License.

		;; Version: 2.7.1
		;; Version: 2.8.0
		;; URL: https://gitlab.emacsos.com/sylecn/zero-el
		;; Package-Requires: ((emacs "24.3") (s "1.2.0"))

		@@ -251,7 +251,7 @@ If item is not in lst, return nil."

		;; zero-input-el version
		(defvar zero-input-version nil "Zero package version.")
		(setq zero-input-version "2.7.1")
		(setq zero-input-version "2.8.0")

		;; FSM state
		(defconst zero-input--state-im-off 'IM-OFF)
		@@ -896,7 +896,9 @@ Argument CH the character that was inserted."
		(or (my-digit-char-p ch)
		(my-capital-letter-p ch)))
		(equal ?。 (ring-ref zero-input-recent-insert-chars 1))
		(my-digit-char-p (ring-ref zero-input-recent-insert-chars 0)))
		(let ((ch (ring-ref zero-input-recent-insert-chars 0)))
		(or (my-digit-char-p ch)
		(eq ch ?\s))))
		(delete-char -2)
		(insert "." (car (ring-elements zero-input-recent-insert-chars))))))))