branch: externals/el-job
commit 45b6e3fe932e3aa27778bdabc51dceda7da4f2e0
Author: Martin Edström <[email protected]>
Commit: Martin Edström <[email protected]>

    Mark obsolete aliases
---
 el-job.el | 70 +++++++++++++++++++++++++--------------------------------------
 1 file changed, 28 insertions(+), 42 deletions(-)

diff --git a/el-job.el b/el-job.el
index 5e88d97053..91c4909ca3 100644
--- a/el-job.el
+++ b/el-job.el
@@ -47,53 +47,39 @@
 
 ;;; Code:
 
-(defvaralias 'el-job-major-version     'el-job-old-major-version)
-(defvaralias 'el-job-max-cores         'el-job-old-max-cores)
-(defvaralias 'el-job--debug-level      'el-job-old--debug-level)
-(defvaralias 'el-job--onetime-canary   'el-job-old--onetime-canary)
-(defvaralias 'el-job--all-jobs         'el-job-old--all-jobs)
+(require 'el-job-ng)
+
+(define-obsolete-variable-alias 'el-job-major-version     
'el-job-old-major-version    "2.7.0 (2026-01-21)")
+(define-obsolete-variable-alias 'el-job-max-cores         
'el-job-old-max-cores        "2.7.0 (2026-01-21)")
+(define-obsolete-variable-alias 'el-job--debug-level      
'el-job-old--debug-level     "2.7.0 (2026-01-21)")
+(define-obsolete-variable-alias 'el-job--onetime-canary   
'el-job-old--onetime-canary  "2.7.0 (2026-01-21)")
+(define-obsolete-variable-alias 'el-job--all-jobs         
'el-job-old--all-jobs        "2.7.0 (2026-01-21)")
 
 (require 'el-job-old)
 
-(defalias 'el-job-launch                      #'el-job-old-launch)
-(defalias 'el-job-kill-all                    #'el-job-old-kill-all)
-(defalias 'el-job-await                       #'el-job-old-await)
-(defalias 'el-job-is-busy                     #'el-job-old-is-busy)
-(defalias 'el-job-cycle-debug-level           #'el-job-old-cycle-debug-level)
-(defalias 'el-job-show-info                   #'el-job-old-show-info)
-(defalias 'el-job--dbg                        #'el-job-old--dbg)
-(defalias 'el-job--locate-lib-in-load-history 
#'el-job-old--locate-lib-in-load-history)
-(defalias 'el-job--ensure-compiled-lib        
#'el-job-old--ensure-compiled-lib)
-(defalias 'el-job--split-evenly               #'el-job-old--split-evenly)
-(defalias 'el-job--split-optimally            #'el-job-old--split-optimally)
-(defalias 'el-job--zip-all                    #'el-job-old--zip-all)
-(defalias 'el-job--windows-cores              #'el-job-old--windows-cores)
-(defalias 'el-job--with                       #'el-job-old--with)
-(defalias 'el-job--spawn-processes            #'el-job-old--spawn-processes)
-(defalias 'el-job--exec-workload              #'el-job-old--exec-workload)
-(defalias 'el-job--poll                       #'el-job-old--poll)
-(defalias 'el-job--reap                       #'el-job-old--reap)
-(defalias 'el-job--handle-output              #'el-job-old--handle-output)
-(defalias 'el-job--disable                    #'el-job-old--disable)
-(defalias 'el-job--sit-until-not              #'el-job-old--sit-until-not)
+(define-obsolete-function-alias 'el-job-launch                      
#'el-job-old-launch                       "2.7.0 (2026-01-21)")
+(define-obsolete-function-alias 'el-job-kill-all                    
#'el-job-old-kill-all                     "2.7.0 (2026-01-21)")
+(define-obsolete-function-alias 'el-job-await                       
#'el-job-old-await                        "2.7.0 (2026-01-21)")
+(define-obsolete-function-alias 'el-job-is-busy                     
#'el-job-old-is-busy                      "2.7.0 (2026-01-21)")
+(define-obsolete-function-alias 'el-job-cycle-debug-level           
#'el-job-old-cycle-debug-level            "2.7.0 (2026-01-21)")
+(define-obsolete-function-alias 'el-job-show-info                   
#'el-job-old-show-info                    "2.7.0 (2026-01-21)")
+(define-obsolete-function-alias 'el-job--dbg                        
#'el-job-old--dbg                         "2.7.0 (2026-01-21)")
+(define-obsolete-function-alias 'el-job--locate-lib-in-load-history 
#'el-job-old--locate-lib-in-load-history  "2.7.0 (2026-01-21)")
+(define-obsolete-function-alias 'el-job--ensure-compiled-lib        
#'el-job-old--ensure-compiled-lib         "2.7.0 (2026-01-21)")
+(define-obsolete-function-alias 'el-job--split-evenly               
#'el-job-old--split-evenly                "2.7.0 (2026-01-21)")
+(define-obsolete-function-alias 'el-job--split-optimally            
#'el-job-old--split-optimally             "2.7.0 (2026-01-21)")
+(define-obsolete-function-alias 'el-job--zip-all                    
#'el-job-old--zip-all                     "2.7.0 (2026-01-21)")
+(define-obsolete-function-alias 'el-job--windows-cores              
#'el-job-old--windows-cores               "2.7.0 (2026-01-21)")
+(define-obsolete-function-alias 'el-job--with                       
#'el-job-old--with                        "2.7.0 (2026-01-21)")
+(define-obsolete-function-alias 'el-job--spawn-processes            
#'el-job-old--spawn-processes             "2.7.0 (2026-01-21)")
+(define-obsolete-function-alias 'el-job--exec-workload              
#'el-job-old--exec-workload               "2.7.0 (2026-01-21)")
+(define-obsolete-function-alias 'el-job--poll                       
#'el-job-old--poll                        "2.7.0 (2026-01-21)")
+(define-obsolete-function-alias 'el-job--reap                       
#'el-job-old--reap                        "2.7.0 (2026-01-21)")
+(define-obsolete-function-alias 'el-job--handle-output              
#'el-job-old--handle-output               "2.7.0 (2026-01-21)")
+(define-obsolete-function-alias 'el-job--disable                    
#'el-job-old--disable                     "2.7.0 (2026-01-21)")
+(define-obsolete-function-alias 'el-job--sit-until-not              
#'el-job-old--sit-until-not               "2.7.0 (2026-01-21)")
 
 (defvar el-jobs :obsolete)
-(let ((complainer
-       (lambda (_) (error "Some renames in el-job 2.3.0, update your code"))))
-  (fset 'el-job:id             complainer)
-  (fset 'el-job:callback       complainer)
-  (fset 'el-job:n-cores-to-use complainer)
-  (fset 'el-job:ready          complainer)
-  (fset 'el-job:busy           complainer)
-  (fset 'el-job:stderr         complainer)
-  (fset 'el-job:timestamps     complainer)
-  (fset 'el-job:poll-timer     complainer)
-  (fset 'el-job:finish-times   complainer)
-  (fset 'el-job:spawn-args     complainer)
-  (fset 'el-job:past-elapsed   complainer)
-  (fset 'el-job:queued-inputs  complainer)
-  (fset 'el-job:input-sets     complainer)
-  (fset 'el-job:result-sets    complainer))
 
 (provide 'el-job)
 

Reply via email to