Browse Source

Update elpa packages

master
Daniel 9 months ago
parent
commit
8397b92aa4
No known key found for this signature in database GPG Key ID: 1C7071A75BB72D64
  1. 9
      elpa/dash-20201231.1620/dash-pkg.el
  2. 3419
      elpa/dash-20201231.1620/dash.info
  3. 4
      elpa/dash-20210116.1426/dash-autoloads.el
  4. 12
      elpa/dash-20210116.1426/dash-pkg.el
  5. 973
      elpa/dash-20210116.1426/dash.el
  6. 4814
      elpa/dash-20210116.1426/dash.info
  7. 2
      elpa/dash-20210116.1426/dir
  8. 2
      elpa/page-break-lines-0.11/page-break-lines-pkg.el
  9. 21
      elpa/page-break-lines-0.14/page-break-lines-autoloads.el
  10. 2
      elpa/page-break-lines-0.14/page-break-lines-pkg.el
  11. 75
      elpa/page-break-lines-0.14/page-break-lines.el

9
elpa/dash-20201231.1620/dash-pkg.el

@ -1,9 +0,0 @@
(define-package "dash" "20201231.1620" "A modern list library for Emacs" 'nil :commit "78fee36e7e7c02595e51fcacf067308be115c22c" :authors
(("Magnar Sveen" . "magnars@gmail.com"))
:maintainer
("Magnar Sveen" . "magnars@gmail.com")
:keywords
("extensions" "lisp"))
;; Local Variables:
;; no-byte-compile: t
;; End:

3419
elpa/dash-20201231.1620/dash.info

File diff suppressed because it is too large

4
elpa/dash-20201231.1620/dash-autoloads.el → elpa/dash-20210116.1426/dash-autoloads.el

@ -53,6 +53,10 @@ See `dash-fontify-mode' for more information on Dash-Fontify mode.
\(fn &optional ARG)" t nil)
(autoload 'dash-register-info-lookup "dash" "\
Register the Dash Info manual with `info-lookup-symbol'.
This allows Dash symbols to be looked up with \\[info-lookup-symbol]." t nil)
(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "dash" '("!cdr" "!cons" "--" "->" "-a" "-butlast" "-c" "-d" "-e" "-f" "-gr" "-i" "-keep" "-l" "-m" "-non" "-only-some" "-p" "-r" "-s" "-t" "-u" "-value-to-list" "-when-let" "-zip" "dash-")))
;;;***

12
elpa/dash-20210116.1426/dash-pkg.el

@ -0,0 +1,12 @@
(define-package "dash" "20210116.1426" "A modern list library for Emacs"
'((emacs "24"))
:commit "4fb9613314f4ea07b1f6965799bd4a044703accd" :authors
'(("Magnar Sveen" . "magnars@gmail.com"))
:maintainer
'("Magnar Sveen" . "magnars@gmail.com")
:keywords
'("extensions" "lisp")
:url "https://github.com/magnars/dash.el")
;; Local Variables:
;; no-byte-compile: t
;; End:

973
elpa/dash-20201231.1620/dash.el → elpa/dash-20210116.1426/dash.el

File diff suppressed because it is too large

4814
elpa/dash-20210116.1426/dash.info

File diff suppressed because it is too large

2
elpa/dash-20201231.1620/dir → elpa/dash-20210116.1426/dir

@ -15,4 +15,4 @@ File: dir, Node: Top This is the top of the INFO tree
* Menu:
Emacs
* Dash: (dash.info). A modern list library for GNU Emacs
* Dash: (dash.info). A modern list library for GNU Emacs.

2
elpa/page-break-lines-0.11/page-break-lines-pkg.el

@ -1,2 +0,0 @@
;;; -*- no-byte-compile: t -*-
(define-package "page-break-lines" "0.11" "Display ugly ^L page breaks as tidy horizontal lines" 'nil :commit "67b5928a7f14568baf2716b5741e13659a86b9ea" :keywords '("convenience" "faces") :authors '(("Steve Purcell" . "steve@sanityinc.com")) :maintainer '("Steve Purcell" . "steve@sanityinc.com") :url "https://github.com/purcell/page-break-lines")

21
elpa/page-break-lines-0.11/page-break-lines-autoloads.el → elpa/page-break-lines-0.14/page-break-lines-autoloads.el

@ -13,27 +13,22 @@
(autoload 'page-break-lines-mode "page-break-lines" "\
Toggle Page Break Lines mode.
If called interactively, enable Page-Break-Lines mode if ARG is
positive, and disable it if ARG is zero or negative. If called
from Lisp, also enable the mode if ARG is omitted or nil, and
toggle it if ARG is `toggle'; disable the mode otherwise.
In Page Break mode, page breaks (^L characters) are displayed as a
horizontal line of `page-break-string-char' characters.
horizontal line of `page-break-lines-char' characters.
\(fn &optional ARG)" t nil)
(autoload 'turn-on-page-break-lines-mode "page-break-lines" "\
Enable `page-break-lines-mode' in this buffer.
\(fn)" nil nil)
(autoload 'turn-off-page-break-lines-mode "page-break-lines" "\
Disable `page-break-lines-mode' in this buffer.
\(fn)" nil nil)
(autoload 'page-break-lines-mode-maybe "page-break-lines" "\
Enable `page-break-lines-mode' in the current buffer if desired.
When `major-mode' is listed in `page-break-lines-modes', then
`page-break-lines-mode' will be enabled.
`page-break-lines-mode' will be enabled." nil nil)
\(fn)" nil nil)
(put 'global-page-break-lines-mode 'globalized-minor-mode t)
(defvar global-page-break-lines-mode nil "\
Non-nil if Global Page-Break-Lines mode is enabled.

2
elpa/page-break-lines-0.14/page-break-lines-pkg.el

@ -0,0 +1,2 @@
;;; Generated package description from page-break-lines-0.14/page-break-lines.el -*- no-byte-compile: t -*-
(define-package "page-break-lines" "0.14" "Display ^L page breaks as tidy horizontal lines" '((emacs "24.4")) :commit "69caea070379f3324c530e96e06625c3cd097cb9" :authors '(("Steve Purcell" . "steve@sanityinc.com")) :maintainer '("Steve Purcell" . "steve@sanityinc.com") :keywords '("convenience" "faces") :url "https://github.com/purcell/page-break-lines")

75
elpa/page-break-lines-0.11/page-break-lines.el → elpa/page-break-lines-0.14/page-break-lines.el

@ -1,11 +1,13 @@
;;; page-break-lines.el --- Display ugly ^L page breaks as tidy horizontal lines
;;; page-break-lines.el --- Display ^L page breaks as tidy horizontal lines -*- lexical-binding: t -*-
;; Copyright (C) 2012-2015 Steve Purcell
;; Author: Steve Purcell <steve@sanityinc.com>
;; URL: https://github.com/purcell/page-break-lines
;; Package-Version: 0.11
;; Package-X-Original-Version: DEV
;; Package-Commit: 69caea070379f3324c530e96e06625c3cd097cb9
;; Package-Version: 0.14
;; Package-X-Original-Version: 0
;; Package-Requires: ((emacs "24.4"))
;; Keywords: convenience, faces
;; This program is free software; you can redistribute it and/or modify
@ -37,7 +39,7 @@
;; If `page-break-lines-char' is displayed at a different width to
;; regular characters, the rule may be either too short or too long:
;; rules may then wrap if `truncate-lines' is nil. On some systems,
;; rules may then wrap if `truncate-lines' is nil. On some systems,
;; Emacs may erroneously choose a different font for the page break
;; symbol, which choice can be overridden using code such as:
@ -73,6 +75,12 @@
:type '(choice (const :tag "No lighter" "") string)
:group 'page-break-lines)
(defcustom page-break-lines-max-width nil
"If non-nil, maximum width (in characters) of page break indicator.
If nil, indicator will span the width of the frame."
:type '(choice integer (const :tag "Full width" nil))
:group 'page-break-lines)
(defcustom page-break-lines-modes
'(emacs-lisp-mode lisp-mode scheme-mode compilation-mode outline-mode help-mode)
"Modes in which to enable `page-break-lines-mode'."
@ -94,25 +102,15 @@ displayed as a junk character."
"Toggle Page Break Lines mode.
In Page Break mode, page breaks (^L characters) are displayed as a
horizontal line of `page-break-string-char' characters."
horizontal line of `page-break-lines-char' characters."
:lighter page-break-lines-lighter
:group 'page-break-lines
(page-break-lines--update-display-tables))
;;;###autoload
(defun turn-on-page-break-lines-mode ()
"Enable `page-break-lines-mode' in this buffer."
(page-break-lines-mode 1))
;;;###autoload
(defun turn-off-page-break-lines-mode ()
"Disable `page-break-lines-mode' in this buffer."
(page-break-lines-mode -1))
(dolist (hook '(window-configuration-change-hook
window-size-change-functions
after-setting-font-hook))
after-setting-font-hook
display-line-numbers-mode-hook))
(add-hook hook 'page-break-lines--update-display-tables))
@ -122,23 +120,36 @@ horizontal line of `page-break-string-char' characters."
If the buffer inside WINDOW has `page-break-lines-mode' enabled,
its display table will be modified as necessary."
(with-current-buffer (window-buffer window)
(if page-break-lines-mode
(progn
(unless buffer-display-table
(setq buffer-display-table (make-display-table)))
(let ((default-height (face-attribute 'default :height nil 'default)))
(set-face-attribute 'page-break-lines nil :height default-height)
(let* ((width (- (window-width window) 1))
(glyph (make-glyph-code page-break-lines-char 'page-break-lines))
(new-display-entry (vconcat (make-list width glyph))))
(unless (equal new-display-entry (elt buffer-display-table ?\^L))
(aset buffer-display-table ?\^L new-display-entry)))))
(when buffer-display-table
(aset buffer-display-table ?\^L nil)))))
(with-selected-window window
(if page-break-lines-mode
(progn
(unless buffer-display-table
(setq buffer-display-table (make-display-table)))
(let ((default-height (face-attribute 'default :height nil 'default)))
(set-face-attribute 'page-break-lines nil :height default-height)
(let* ((cwidth (char-width page-break-lines-char))
(wwidth-pix (- (window-width nil t)
(if (and (bound-and-true-p display-line-numbers)
(fboundp 'line-number-display-width))
(line-number-display-width t)
0)))
(width (- (/ wwidth-pix (frame-char-width) cwidth)
(if (display-graphic-p) 0 1)))
(width (if page-break-lines-max-width
(min width page-break-lines-max-width)
width))
(glyph (make-glyph-code page-break-lines-char 'page-break-lines))
(new-display-entry (vconcat (make-list width glyph))))
(unless (equal new-display-entry (elt buffer-display-table ?\^L))
(aset buffer-display-table ?\^L new-display-entry)))))
(when (and (apply 'derived-mode-p page-break-lines-modes)
buffer-display-table)
(aset buffer-display-table ?\^L nil))))))
(defun page-break-lines--update-display-tables (&optional frame)
"Function called for updating display table in windows of FRAME."
(mapc 'page-break-lines--update-display-table (window-list frame 'no-minibuffer)))
(unless (minibufferp)
(mapc 'page-break-lines--update-display-table (window-list frame 'no-minibuffer))))
@ -154,6 +165,7 @@ When `major-mode' is listed in `page-break-lines-modes', then
;;;###autoload
(define-global-minor-mode global-page-break-lines-mode
page-break-lines-mode page-break-lines-mode-maybe
:require 'page-break-lines
:group 'page-break-lines)
@ -161,7 +173,6 @@ When `major-mode' is listed in `page-break-lines-modes', then
;; Local Variables:
;; coding: utf-8
;; byte-compile-warnings: (not cl-functions)
;; checkdoc-minor-mode: t
;; End:
Loading…
Cancel
Save