Because of math being upsetting, we were adding 4 padding characters to an already-properly-padded base64 string, which broke tazjin. This also breaks this function out into panettone.util, and adds a test for it. Change-Id: I7bc8a440ad9d0917272dd9f2e341081ea14693da Reviewed-on: https://cl.tvl.fyi/c/depot/+/5782 Autosubmit: grfn <grfn@gws.fyi> Reviewed-by: tazjin <tazjin@tvl.su> Tested-by: BuildkiteCI
		
			
				
	
	
		
			55 lines
		
	
	
	
		
			962 B
		
	
	
	
		
			Nix
		
	
	
	
	
	
			
		
		
	
	
			55 lines
		
	
	
	
		
			962 B
		
	
	
	
		
			Nix
		
	
	
	
	
	
| { depot, ... }:
 | |
| 
 | |
| depot.nix.buildLisp.program {
 | |
|   name = "panettone";
 | |
| 
 | |
|   deps = with depot.third_party.lisp; [
 | |
|     bordeaux-threads
 | |
|     cl-json
 | |
|     cl-ppcre
 | |
|     cl-smtp
 | |
|     cl-who
 | |
|     defclass-std
 | |
|     drakma
 | |
|     easy-routes
 | |
|     hunchentoot
 | |
|     lass
 | |
|     local-time
 | |
|     postmodern
 | |
| 
 | |
|     depot.lisp.klatre
 | |
|   ];
 | |
| 
 | |
|   srcs = [
 | |
|     ./panettone.asd
 | |
|     ./src/packages.lisp
 | |
|     ./src/util.lisp
 | |
|     ./src/css.lisp
 | |
|     ./src/email.lisp
 | |
|     ./src/inline-markdown.lisp
 | |
|     ./src/authentication.lisp
 | |
|     ./src/model.lisp
 | |
|     ./src/irc.lisp
 | |
|     ./src/panettone.lisp
 | |
|   ];
 | |
| 
 | |
|   tests = {
 | |
|     deps = with depot.third_party.lisp; [
 | |
|       fiveam
 | |
|     ];
 | |
| 
 | |
|     srcs = [
 | |
|       ./test/package.lisp
 | |
|       ./test/model_test.lisp
 | |
|       ./test/inline-markdown_test.lisp
 | |
|       ./test/util_test.lisp
 | |
|     ];
 | |
| 
 | |
|     expression = "(fiveam:run!)";
 | |
|   };
 | |
| 
 | |
|   brokenOn = [
 | |
|     "ecl" # dependencies use dynamic cffi
 | |
|     "ccl" # The value NIL is not of the expected type STRING. when loading model.lisp
 | |
|   ];
 | |
| }
 |