diff options
| author | Kyle Meyer <kyle@kyleam.com> | 2017-05-05 19:44:18 -0400 |
|---|---|---|
| committer | Kyle Meyer <kyle@kyleam.com> | 2017-05-05 21:54:35 -0400 |
| commit | 36508630d7b8a2c7941f01104e0a0581a464d8cc (patch) | |
| tree | 3184e79de4c4763531fd027aa8523b4454ba3d2c | |
| parent | 57f3a6110d7386cb71b01b8251aa7d3b11be5b8e (diff) | |
| download | org-link-edit-36508630d7b8a2c7941f01104e0a0581a464d8cc.tar.gz | |
transport-next-link: Rename a variable for clarity
Make it more obvious that this variable corresponds to the original
link's description, not the new description specified by the word at
point or the selected text.
| -rw-r--r-- | org-link-edit.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/org-link-edit.el b/org-link-edit.el index 636d191..6e58155 100644 --- a/org-link-edit.el +++ b/org-link-edit.el @@ -374,9 +374,9 @@ END." (org-link-edit--on-link-p))) (user-error "Cannot transport next link with point on a link")) (goto-char (or (car desc-bounds) pt)) - (cl-multiple-value-bind (link-beg link-end link desc) + (cl-multiple-value-bind (link-beg link-end link orig-desc) (org-link-edit--next-link-data previous) - (unless (or (not desc-bounds) (= (length desc) 0)) + (unless (or (not desc-bounds) (= (length orig-desc) 0)) (user-error "Link already has a description")) (delete-region link-beg link-end) (insert (org-make-link-string |