mirror of
https://github.com/org-roam/org-roam
synced 2025-08-01 12:17:21 -05:00
(internal): org-roam-db--update-maybe -> org-roam-db--upgrade-maybe (#1307)
This commit is contained in:
@ -75,8 +75,6 @@
|
|||||||
"org-roam 1.1.0")
|
"org-roam 1.1.0")
|
||||||
(define-obsolete-function-alias 'org-roam--capture 'org-roam-capture--capture
|
(define-obsolete-function-alias 'org-roam--capture 'org-roam-capture--capture
|
||||||
"org-roam 1.1.0")
|
"org-roam 1.1.0")
|
||||||
(define-obsolete-function-alias 'org-roam-db--maybe-update 'org-roam-db--update-maybe
|
|
||||||
"org-roam 1.1.0")
|
|
||||||
(define-obsolete-function-alias 'org-roam-db--clear 'org-roam-db-clear
|
(define-obsolete-function-alias 'org-roam-db--clear 'org-roam-db-clear
|
||||||
"org-roam 1.2.0")
|
"org-roam 1.2.0")
|
||||||
(define-obsolete-function-alias 'org-roam-dailies-today 'org-roam-dailies-find-today
|
(define-obsolete-function-alias 'org-roam-dailies-today 'org-roam-dailies-find-today
|
||||||
|
@ -134,7 +134,7 @@ Performs a database upgrade when required."
|
|||||||
(when init-db
|
(when init-db
|
||||||
(org-roam-db--init conn))
|
(org-roam-db--init conn))
|
||||||
(let* ((version (caar (emacsql conn "PRAGMA user_version")))
|
(let* ((version (caar (emacsql conn "PRAGMA user_version")))
|
||||||
(version (org-roam-db--update-maybe conn version)))
|
(version (org-roam-db--upgrade-maybe conn version)))
|
||||||
(cond
|
(cond
|
||||||
((> version org-roam-db--version)
|
((> version org-roam-db--version)
|
||||||
(emacsql-close conn)
|
(emacsql-close conn)
|
||||||
@ -193,7 +193,7 @@ SQL can be either the emacsql vector representation, or a string."
|
|||||||
(emacsql db [:create-table $i1 $S2] table schema))
|
(emacsql db [:create-table $i1 $S2] table schema))
|
||||||
(emacsql db (format "PRAGMA user_version = %s" org-roam-db--version))))
|
(emacsql db (format "PRAGMA user_version = %s" org-roam-db--version))))
|
||||||
|
|
||||||
(defun org-roam-db--update-maybe (db version)
|
(defun org-roam-db--upgrade-maybe (db version)
|
||||||
"Upgrades the database schema for DB, if VERSION is old."
|
"Upgrades the database schema for DB, if VERSION is old."
|
||||||
(emacsql-with-transaction db
|
(emacsql-with-transaction db
|
||||||
'ignore
|
'ignore
|
||||||
|
Reference in New Issue
Block a user