Move some URLs to SOURCE properties

This commit is contained in:
Gergely Polonkai 2019-02-19 10:51:33 +01:00
parent 0836515690
commit 9a92b7b061
1 changed files with 24 additions and 16 deletions

View File

@ -356,8 +356,9 @@ ARG will be passed down verbatim to `self-insert-command'"
#+END_SRC #+END_SRC
*** Fill or unfill a paragraph *** Fill or unfill a paragraph
:PROPERTIES:
From http://pages.sachachua.com/.emacs.d/Sacha.html :SOURCE: http://pages.sachachua.com/.emacs.d/Sacha.html
:END:
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
(defun sachachua/fill-or-unfill-paragraph (&optional unfill region) (defun sachachua/fill-or-unfill-paragraph (&optional unfill region)
@ -370,8 +371,9 @@ From http://pages.sachachua.com/.emacs.d/Sacha.html
#+END_SRC #+END_SRC
*** Swap occurences of strings *** Swap occurences of strings
:PROPERTIES:
Copied from http://emacs.stackexchange.com/a/27170/507 :SOURCE: http://emacs.stackexchange.com/a/27170/507
:END:
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
(defun so/query-swap-strings (from-string (defun so/query-swap-strings (from-string
@ -456,8 +458,9 @@ line first. Then jump to the actual end of the line."
** File manipulation ** File manipulation
*** Rename the current file *** Rename the current file
:PROPERTIES:
Copied from http://whattheemacsd.com/file-defuns.el-01.html :SOURCE: http://whattheemacsd.com/file-defuns.el-01.html
:END:
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
(defun rename-current-buffer-file () (defun rename-current-buffer-file ()
@ -481,8 +484,9 @@ Copied from http://whattheemacsd.com/file-defuns.el-01.html
#+END_SRC #+END_SRC
*** Delete the current file *** Delete the current file
:PROPERTIES:
Copied from http://whattheemacsd.com/file-defuns.el-02.html :SOURCE: http://whattheemacsd.com/file-defuns.el-02.html
:END:
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
(defun delete-current-buffer-file () (defun delete-current-buffer-file ()
@ -571,11 +575,12 @@ name."
** Frame manipulation ** Frame manipulation
*** Hidden modeline mode *** Hidden modeline mode
:PROPERTIES:
:SOURCE: http://emacs-doctor.com/emacs-strip-tease.html
:END:
To temporarily hide the mode line. To temporarily hide the mode line.
Copied from http://emacs-doctor.com/emacs-strip-tease.html
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
(defvar hidden-mode-line-mode nil) (defvar hidden-mode-line-mode nil)
(defvar hide-mode-line nil) (defvar hide-mode-line nil)
@ -846,11 +851,12 @@ HTML.
#+END_SRC #+END_SRC
** Utility functions for EDiff ** Utility functions for EDiff
:PROPERTIES:
:SOURCE: http://article.gmane.org/gmane.emacs.orgmode/75222
:END:
EDiff and Org-mode files dont play nice together EDiff and Org-mode files dont play nice together
From [[http://article.gmane.org/gmane.emacs.orgmode/75222][gmane.emacs.orgmode]]
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
(defun f-ediff-org-showhide (buf command &rest cmdargs) (defun f-ediff-org-showhide (buf command &rest cmdargs)
"If buffer BUF exists and in `org-mode', execute COMMAND with CMDARGS." "If buffer BUF exists and in `org-mode', execute COMMAND with CMDARGS."
@ -874,8 +880,9 @@ From [[http://article.gmane.org/gmane.emacs.orgmode/75222][gmane.emacs.orgmode]]
#+END_SRC #+END_SRC
** Leave ~isearch~ at the other end of the matched string ** Leave ~isearch~ at the other end of the matched string
:PROPERTIES:
Taken from [[http://endlessparentheses.com/leave-the-cursor-at-start-of-match-after-isearch.html][endless parentheses]] :SOURCE: http://endlessparentheses.com/leave-the-cursor-at-start-of-match-after-isearch.html
:END:
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
(defun isearch-exit-other-end () (defun isearch-exit-other-end ()
@ -887,8 +894,9 @@ Taken from [[http://endlessparentheses.com/leave-the-cursor-at-start-of-match-af
#+END_SRC #+END_SRC
** Mark the current match after leaving ~isearch~ ** Mark the current match after leaving ~isearch~
:PROPERTIES:
Taken from [[http://emacs.stackexchange.com/a/31321/507][here]]. :SOURCE: http://emacs.stackexchange.com/a/31321/507
:END:
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
(defun isearch-exit-mark-match () (defun isearch-exit-mark-match ()