 												
 
 (defun ngender-drop-assoc-by-key (symbol key)
-  (set symbol (assoc-delete-all key (ngender-symbol-value symbol)))
+  (set symbol (ngender-assoc-delete-all key (ngender-symbol-value symbol)))
 )
 
 (defun ngender-package-archive-delete (key)

		
(defun ngender-provide-function (module)
	"move (module feature...) from loading to loaded - used by macro ngender-provide"
	(if-let ( (module (ngender-normalize-module module)) )
		(if-let ( (module+features (assoc module *ngender-modules-loading*)) )
			(progn
				(setq *ngender-modules-loading* (cl-delete module+features *ngender-modules-loading*))
				(add-to-list '*ngender-modules-loaded* module+features) )
			(lwarn :warning "ngender-provide: no %s being loaded, doing nothing" module) ) ) )

;; file a bug with emacs in re the apparent dynamic binding
;; of free / global variables with let.  There needs to be

	(let ( (pair (assoc key *ngender-known-package-archives*)) )
		(cond
			( (symbolp key) (ngender-add-package-archive-by-key (symbol-name key)) )
			( (not (stringp key)) (warn "expected string archive key: %s" key) )
			( (null pair) (warn "expected known archive key: %s" key) )
			( t (ngender-add-package-archive-pair 'package-archives pair) ) ) ) )

(defun ngender-package-archive (&rest args)
