From 68ede3031068b1770260eef39d780d4e5be37001 Mon Sep 17 00:00:00 2001 From: Gergely Polonkai Date: Fri, 14 Oct 2016 13:38:15 +0200 Subject: [PATCH] Update smartparens package --- .../smartparens-autoloads.el | 8 ++--- .../smartparens-clojure.el | 0 .../smartparens-config.el | 0 .../smartparens-ess.el | 0 .../smartparens-haskell.el | 0 .../smartparens-html.el | 0 .../smartparens-latex.el | 0 .../smartparens-lua.el | 0 .../smartparens-pkg.el | 2 +- .../smartparens-python.el | 0 .../smartparens-racket.el | 0 .../smartparens-ruby.el | 0 .../smartparens-rust.el | 0 .../smartparens-scala.el | 0 .../smartparens.el | 31 +------------------ 15 files changed, 6 insertions(+), 35 deletions(-) rename elpa/{smartparens-20161009.858 => smartparens-20161014.323}/smartparens-autoloads.el (97%) rename elpa/{smartparens-20161009.858 => smartparens-20161014.323}/smartparens-clojure.el (100%) rename elpa/{smartparens-20161009.858 => smartparens-20161014.323}/smartparens-config.el (100%) rename elpa/{smartparens-20161009.858 => smartparens-20161014.323}/smartparens-ess.el (100%) rename elpa/{smartparens-20161009.858 => smartparens-20161014.323}/smartparens-haskell.el (100%) rename elpa/{smartparens-20161009.858 => smartparens-20161014.323}/smartparens-html.el (100%) rename elpa/{smartparens-20161009.858 => smartparens-20161014.323}/smartparens-latex.el (100%) rename elpa/{smartparens-20161009.858 => smartparens-20161014.323}/smartparens-lua.el (100%) rename elpa/{smartparens-20161009.858 => smartparens-20161014.323}/smartparens-pkg.el (71%) rename elpa/{smartparens-20161009.858 => smartparens-20161014.323}/smartparens-python.el (100%) rename elpa/{smartparens-20161009.858 => smartparens-20161014.323}/smartparens-racket.el (100%) rename elpa/{smartparens-20161009.858 => smartparens-20161014.323}/smartparens-ruby.el (100%) rename elpa/{smartparens-20161009.858 => smartparens-20161014.323}/smartparens-rust.el (100%) rename elpa/{smartparens-20161009.858 => smartparens-20161014.323}/smartparens-scala.el (100%) rename elpa/{smartparens-20161009.858 => smartparens-20161014.323}/smartparens.el (99%) diff --git a/elpa/smartparens-20161009.858/smartparens-autoloads.el b/elpa/smartparens-20161014.323/smartparens-autoloads.el similarity index 97% rename from elpa/smartparens-20161009.858/smartparens-autoloads.el rename to elpa/smartparens-20161014.323/smartparens-autoloads.el index 020c252..1516a50 100644 --- a/elpa/smartparens-20161009.858/smartparens-autoloads.el +++ b/elpa/smartparens-20161014.323/smartparens-autoloads.el @@ -3,8 +3,8 @@ ;;; Code: (add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path)))) -;;;### (autoloads nil "smartparens" "smartparens.el" (22523 34125 -;;;;;; 532790 226000)) +;;;### (autoloads nil "smartparens" "smartparens.el" (22528 49222 +;;;;;; 858279 896000)) ;;; Generated autoloads from smartparens.el (autoload 'sp-cheat-sheet "smartparens" "\ @@ -185,8 +185,8 @@ Turn off `show-smartparens-mode'. ;;;;;; "smartparens-ess.el" "smartparens-haskell.el" "smartparens-html.el" ;;;;;; "smartparens-latex.el" "smartparens-lua.el" "smartparens-pkg.el" ;;;;;; "smartparens-python.el" "smartparens-racket.el" "smartparens-ruby.el" -;;;;;; "smartparens-rust.el" "smartparens-scala.el") (22523 34125 -;;;;;; 564790 380000)) +;;;;;; "smartparens-rust.el" "smartparens-scala.el") (22528 49222 +;;;;;; 894279 852000)) ;;;*** diff --git a/elpa/smartparens-20161009.858/smartparens-clojure.el b/elpa/smartparens-20161014.323/smartparens-clojure.el similarity index 100% rename from elpa/smartparens-20161009.858/smartparens-clojure.el rename to elpa/smartparens-20161014.323/smartparens-clojure.el diff --git a/elpa/smartparens-20161009.858/smartparens-config.el b/elpa/smartparens-20161014.323/smartparens-config.el similarity index 100% rename from elpa/smartparens-20161009.858/smartparens-config.el rename to elpa/smartparens-20161014.323/smartparens-config.el diff --git a/elpa/smartparens-20161009.858/smartparens-ess.el b/elpa/smartparens-20161014.323/smartparens-ess.el similarity index 100% rename from elpa/smartparens-20161009.858/smartparens-ess.el rename to elpa/smartparens-20161014.323/smartparens-ess.el diff --git a/elpa/smartparens-20161009.858/smartparens-haskell.el b/elpa/smartparens-20161014.323/smartparens-haskell.el similarity index 100% rename from elpa/smartparens-20161009.858/smartparens-haskell.el rename to elpa/smartparens-20161014.323/smartparens-haskell.el diff --git a/elpa/smartparens-20161009.858/smartparens-html.el b/elpa/smartparens-20161014.323/smartparens-html.el similarity index 100% rename from elpa/smartparens-20161009.858/smartparens-html.el rename to elpa/smartparens-20161014.323/smartparens-html.el diff --git a/elpa/smartparens-20161009.858/smartparens-latex.el b/elpa/smartparens-20161014.323/smartparens-latex.el similarity index 100% rename from elpa/smartparens-20161009.858/smartparens-latex.el rename to elpa/smartparens-20161014.323/smartparens-latex.el diff --git a/elpa/smartparens-20161009.858/smartparens-lua.el b/elpa/smartparens-20161014.323/smartparens-lua.el similarity index 100% rename from elpa/smartparens-20161009.858/smartparens-lua.el rename to elpa/smartparens-20161014.323/smartparens-lua.el diff --git a/elpa/smartparens-20161009.858/smartparens-pkg.el b/elpa/smartparens-20161014.323/smartparens-pkg.el similarity index 71% rename from elpa/smartparens-20161009.858/smartparens-pkg.el rename to elpa/smartparens-20161014.323/smartparens-pkg.el index b3045ca..9a140a2 100644 --- a/elpa/smartparens-20161009.858/smartparens-pkg.el +++ b/elpa/smartparens-20161014.323/smartparens-pkg.el @@ -1,4 +1,4 @@ -(define-package "smartparens" "20161009.858" "Automatic insertion, wrapping and paredit-like navigation with user defined pairs." +(define-package "smartparens" "20161014.323" "Automatic insertion, wrapping and paredit-like navigation with user defined pairs." '((dash "2.12.1") (cl-lib "0.3"))) ;; Local Variables: diff --git a/elpa/smartparens-20161009.858/smartparens-python.el b/elpa/smartparens-20161014.323/smartparens-python.el similarity index 100% rename from elpa/smartparens-20161009.858/smartparens-python.el rename to elpa/smartparens-20161014.323/smartparens-python.el diff --git a/elpa/smartparens-20161009.858/smartparens-racket.el b/elpa/smartparens-20161014.323/smartparens-racket.el similarity index 100% rename from elpa/smartparens-20161009.858/smartparens-racket.el rename to elpa/smartparens-20161014.323/smartparens-racket.el diff --git a/elpa/smartparens-20161009.858/smartparens-ruby.el b/elpa/smartparens-20161014.323/smartparens-ruby.el similarity index 100% rename from elpa/smartparens-20161009.858/smartparens-ruby.el rename to elpa/smartparens-20161014.323/smartparens-ruby.el diff --git a/elpa/smartparens-20161009.858/smartparens-rust.el b/elpa/smartparens-20161014.323/smartparens-rust.el similarity index 100% rename from elpa/smartparens-20161009.858/smartparens-rust.el rename to elpa/smartparens-20161014.323/smartparens-rust.el diff --git a/elpa/smartparens-20161009.858/smartparens-scala.el b/elpa/smartparens-20161014.323/smartparens-scala.el similarity index 100% rename from elpa/smartparens-20161009.858/smartparens-scala.el rename to elpa/smartparens-20161014.323/smartparens-scala.el diff --git a/elpa/smartparens-20161009.858/smartparens.el b/elpa/smartparens-20161014.323/smartparens.el similarity index 99% rename from elpa/smartparens-20161009.858/smartparens.el rename to elpa/smartparens-20161014.323/smartparens.el index fe5c072..410aa2e 100644 --- a/elpa/smartparens-20161009.858/smartparens.el +++ b/elpa/smartparens-20161014.323/smartparens.el @@ -1335,10 +1335,6 @@ than once should wrap them all in sp--with-case-sensitive." "Checks to see if the current `evil-state' is in visual mode." (and (fboundp 'evil-visual-state-p) (evil-visual-state-p))) -(defun sp--reverse-string (str) - "Reverse the string STR." - (concat (reverse (append str nil)))) - (defun sp-point-in-blank-line (&optional p) "Return non-nil if line at point is blank (whitespace only). @@ -1440,13 +1436,6 @@ TODO: fix this!" ((string-match-p "SPC" original) " ") (t original)))) -(defun sp--split-string (string by) - "Split STRING on BY. This simply calls `split-string' and if it -returns a list of length one, empty string is inserted to the -beginning." - (let ((sp (split-string string by))) - (if (not (cdr sp)) (cons "" sp) sp))) - ;; see https://github.com/Fuco1/smartparens/issues/125#issuecomment-20356176 (defun sp--current-indentation () "Get the indentation offset of the current line." @@ -2973,9 +2962,6 @@ delimiter for any pair allowed in current context." (cl-defun sp--get-stringlike-regexp (&optional (pair-list (sp--get-allowed-stringlike-list))) (regexp-opt (--map (car it) pair-list))) -(defun sp-pair-is-stringlike-p (delim) - (--first (equal delim (car it)) (sp--get-allowed-stringlike-list))) - (defun sp--get-last-wraped-region (beg end open close) "Return `sp-get-sexp' style plist about the last wrapped region. @@ -3250,11 +3236,6 @@ include separate pair node." (append (list nil second-action nil first-action) previous-undo-actions))))) -(defun sp--string-empty-p (delimeter) - "Return t if point is inside an empty string." - (and (equal (char-after (1+ (point))) delimeter) - (equal (char-after (- (point) 2)) delimeter))) - ;; TODO: remove ACTION argument and make the selection process more ;; unified (see also sp--pair-to-wrap which depends on buffer state ;; among other things) @@ -7895,7 +7876,7 @@ delimiter enclosing this sexp." ((sp-point-in-empty-string pos))))) (defun sp-point-in-empty-string (&optional pos) - "Return non-nil if point is in empty sexp or string. + "Return non-nil if point is in empty string. The return value is actually cons pair of opening and closing string delimiter enclosing this string." @@ -7908,16 +7889,6 @@ string delimiter enclosing this string." (c (char-to-string (if (eq syntax t) (following-char) syntax)))) (cons c c))))) -(defun sp-zap-syntax (syntax &optional back) - "Delete characters forward until they match syntax class SYNTAX. - -If BACK is non-nil, delete backward." - (let ((p (point))) - (if back - (skip-syntax-backward syntax) - (skip-syntax-forward syntax)) - (delete-region p (point)))) - (defun sp--use-subword () "Return non-nil if word killing commands should kill subwords. This is the case if `subword-mode' is enabled and