| 
					
				 | 
			
			
				@@ -83,8 +83,10 @@ emacs-lisp representation of the value of the variable." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				       (let ((var (match-string 1 assignment)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				             (ref (match-string 2 assignment))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				         (cons (intern var) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-              (or (org-babel-ref-literal ref) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-                  (org-babel-ref-resolve-reference ref params)))))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+	      ((lambda (val) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+		 (if (equal :ob-must-be-reference val) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+		     (org-babel-ref-resolve-reference ref params) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+		   val)) (org-babel-ref-literal ref)))))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				  
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 (defun org-babel-ref-literal (ref) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   "Determine if the right side of a header argument variable 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -95,7 +97,8 @@ return nil." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   (let ((out (org-babel-read ref))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				     (if (equal out ref) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				         (if (string-match "^\".+\"$" ref) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-            (read ref)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+            (read ref) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+	  :ob-must-be-reference) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				       out))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				  
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 (defvar org-babel-library-of-babel) 
			 |